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FOREWORD 


Now that you've mastered simple BASIC on 
computer, what do you do next? 


your 


The answer Lies in this book. Tim Hartnell has 
covered the areas of computer programming which 
I think are most Likely to be of interest to 


you, including moving graphics, the use 


MODE(1}, music and PEEK and POKE. 


of 


As well as the 'lessons', there are fifteen or 
so games which you're sure to enjoy = running. 


The appendix contains a useful glossary 


of 


computer words, and a very clear explanation of 


how computers in general - and yours 


particular — work. 


Now that you have simple programming 
control, it is time to tackle some 


in 


under 


more 


difficult, but highly rewarding, areas. This 


book gives you the key. 


Jeremy Ruston, 
1983 


*Jeremy Ruston is the author of a number 
of popular computer books, including 
PASCAL FOR HUMAN BEINGS (Interface 
PubLications, 1982), THE BOOK OF 
LISTINGS (co-author Tim HartnetLl, BBC 
Publications), THE BBC MICRO REVEALED 
{Interface Publications, 1982) and THE 
BBC MICRO COMPENDIUM [Interface 
Publications, 1982), He contributes 
extensively to the computer press, 
inctLuding POPULAR COMPUTING WEEKLY, 
PERSONAL COMPUTING TODAY and ZX COMPUTING, 
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CHAPTER ONE — 
CREATING PROGRAMS 


Many books on programming suggest you start by 
drawing up a 'flowchart' — a combination of 
circles, diamonds and slanting rectangles, 
which sets out the path and operations’ the 
computer will follow to execute a program. In 
theory, this is fine, but in many cases’ the 
time and trouble involved may not be worth it. 


It is, however, essential that you know exactly 
what you want the computer to do before you 
start creating a new program, even if you're 
not quite sure how you're going to get the 
computer to carry out the task. 


Sometimes a rough sort of flowchart — perhaps 
just a List of the main steps the computer will 
take, linked by little arrows and Loops — will 
help to clarify your thinking. It is also a 
good way to spot potential problems, Like the 
danger of setting up infinite loops, or of not 
specifying the nature of the computer's 
decisions exactly. 


I would Like to introduce you to a school of 
programming thought called ‘Structured 
Programming'. Structured programming says that 
programs need to be designed from the ‘top 
down'. That is, you need to speLl out in words, 
Long before you start actual programming, 
exactly what you want the computer to do, and 
in what order. 


The first program in the book, TIC TAC TOE, was 
written to demonstrate structured programming 


in action. If you look at the beginning of the 
Listing, lines 180 to 170, you'Ll see what is - 
in effect -— the whole program in a series’ of 
subroutine calls. 


10 REM TIC TAC TOE 
20 CLS 


90 DIM AC) 

95 FOR T=1 TO 9:A(T)=0:S50UND T,1:NEXT 7 

100 T=RND(G) 

105 IF 77.7 THEN PRINT "I'LL HAVE THE FIRST MOVE" 
110 IF Té=.7 THEN PRINT "YOU HAVE THE FIRST MOVE" 
115 FOR Z=i TO 1000:NEXT:CLS 

120 IF 12.7 THEN 140 

123 TF INKEY$<>"" THEN 125 

130 6Q5UB 750 

140 GOSUB 480 

150 GOSUB 470 

160 GOSUB 750 

170 G0SUB 480 

180 IF A(3)=0 THEN A(S)=1:60T0 130 


What do I mean by this claim, the 'whole 
program'? When I sat down to write this 
program, I first Listed the steps the computer 
would follow, Like this: 


~ decide who goes first 

—- print out the board 

- check to see if anyone has won 

- let the human move 

—- print out the board 

— check to see if anyone has won 

~ let the computer move 

- go to the second item in the List 
and cycle through again and again 
until somebody wins 
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Once I had this list written, I changed most of 
the instructions into Subroutine calls. Look 
again at the Lines I mentioned. By following 
them through in the program, you'll see they 
correspond fairly closely to my initial List: 


10 - 115: Decide who will have first move 


120: If the computer is having first move, jump 
to Line 160, which calls up the board print 
subroutine 


130: If not, this line goes to the subroutine 
from Line 750 which prints up the board 


140: Sends action to the subroutine from Line 
480 which performs the ‘win check'! 


150: Calls the subroutine from Line 670 which 
accepts the player's move 


160: Calls the board print subroutine 
170: Calls the win check subroutine 


180: Moves into the centre square if it's 
available, then goes back to 130 to cycle 
through again 


You'll see, in the next section, that a number 
of Lines end with GOTO 130. These are triggered 
when the computer has moved, and the program 
then goes back to 130 to cycle again. Apart 
from the ‘who will go first?' routine which was 
added Later, the program proper is really held 
within those few lines 130 to 170. These were 
written as Subroutine calls, and each 
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subroutine Labelled, long before I had actually 
written the relevant subroutines. 


This meant that I could proceed step by step, 
debugging an isolated subroutine, before going 
on to the next. This is the real advantage of 
structured programming. Because the program 
consists of a number of discrete modules, each 
charged with performing a specific’ task, 
tracking down bugs is simplified, the flow of 
action through the program is relatively 
transparent, and subsequent modification of the 
program is easy. 


i90 REM TO COMPLETE ROW/BLOCK 
200 D=} 

210 BI 

220 IF B={ THEN X=: 
200 IF B=2 THEN X=1: 
240 IF B=3 THEN X=1:Y= 
200 IF B=4 THEN X=3: 
260 C= 

270 IF A(X)=D AND ACY)=D AND A(Z)=0 THEN A(Z)=1:60T0 130 
200 IF A(X)=D AND ACY)=6 AND A(Z)=D THEN A(Y)=1:650T0 130 
270 IF ACY)=0 AND ACY)=D AND A(Z)=D THEN A(X)=1:60T0 130 
S00 IF Bel THEN X=X+3:Y=¥+3s2=7+3 

S10 IF B=2 THEN X=Xti:Y=¥t1:Z=Z+! 

S20 IF C63 THEN C=C+1:G0T0 270 

330 IF B&4 THEN B=B+i:G0TO 230 

540 IF D62 THEN D=D+i:60TO 210 

S50 REN MOVE AT RANDOM 

560 B=] 

2/0 D=INT(RND(Q) $9) +1 

380 TF A(C)=0 THEN A(C)=1:G60TO 130 

590 B=Bt{ 

406 IF BO21 THEN 370 

410 B=0 


420 B=B+1 

430 IF A(B)=0 THEN A(B)=1:G0TO 130 
440 IF BC? THEN 420 

450 6OSUB 750 

440 PRINT:PRINT"IT’S A DRAW" 

470 6070 650 


480 REN WIN CHECK 
49) FOR B=1 TO 4 
500 IF B=1 THEN X=1: 
ulQ IF B=2 THEN X=i: 
520 IF B=3 THEN X=]: 
S00 IF B=4 THEN X=3: 
340 FOR C=1 TO 3 
S50 IF ACK)=A(Y) AND ACY)=A(Z) AND ACX)<70 THEN 410 
560 IF B=1 THEN X=X+3:¥=¥t5:ZeZ+3 

ufQ IF B=2 THEN X=X+1:¥=¥ti3Z=2+1 

u80 NEXT C 

J90 NEXT B 

600 RETURN 


¥e2:1=5 
¥=432=/ 
Yeas Z=9 
= 


610 REM THE WINNER! 

620 PRINT 

630 TF A(X)=1 THEN PRINT "I°M THE WINNER!” 
&40 IF AtxX)=2 THEN PRINT "YOU'RE THE WINNER!“ 
650 FOR O=1 TO 1000:NEXT 0 

660 6070 95 

67) REN PLAYER MOVE 

&79 IF INKEY$<2"" THEN 675 

680 PRINT 2 450,"ENTER YOUR MOVE" 

690 AS=INKEYS 

700 IF AS¢"1" OR AS>"9" THEN 690 

710 B=VAL(A$) 

720 IF ACB)< WO THEN 690 

723 PRINT @ 450," : 

730 A(B)=2 

740 RETURN 


750 REN PRINTOUT 

760 PRINT @ 44, 

780 PRINT “123 7%; 

790 FLA =0 

800 FOR B=i 10 9 

G10 IF A(B)=0 THEN FLA =I 

B20 IF A(B)=0 THEN PRINT * - *3 

850 IF A(B)=1 THEN PRINT ° 0 °3:50UND 1,1! 
B40 IF AC(B)=2 THEN PRINT " X "seSQUND 15,1 
950 IF B=3 THEN PRINT:PRINT:PRINT "4 3 6 
B60 IF B=6 THEN PRINT:PRINT:PRINT "7 B 9 
870 NEXT B 

B80 IF FLA =0 THEN 460 

890 RETURN 


Here's the program in action: 
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T°M THE WINNER! 


I urge you to follow a Sequence of steps_ such 
as those outlined above when you're writing a 
program from scratch. It may not be necessary 
to do so if you're working on a fairly simple 
program, or are adapting from a magazine or 
book. Even then, if you're working directly on 
the computer, it is handy to keep a notebook by 
you to record such things as that you've 
assigned A$ to the player's name. 


GETTING THINGS ON TAPE 


If you're writing a program directly on the 
keyboard, and you want to add a_= subroutine 
which will eventually be at the end of progran, 
give it a very high Line number, It can easily 
be renumbered Later if you like. This is’ far 
better than having to jump over a_ subroutine, 
as the program expands, with an ugly GOTO. 


You should resist the temptation to put all 
your programs on a single cassette, one program 
after another. The frustration you'll 
experience searching through the tape — even if 
you've identified each program with a _ voice 
Label -— to find a particular program, is just 
not worth the trouble. 


Go to your computer store, and get a set of C- 
42 or C-20 cassettes. Put just one program on 
each cassette, with two or three copies of each 
one in case your recording gets damaged, 
accidentally erased or won't Load. 


Write the name of the program on the’ cassette 
and on the cardboard insert. You'Ll find this 
makes it very easy to locate the program you 
want. As well, as your Library of programs 
grows, it will give you quite a feeling of 
accomplishment to see all those programs ranked 
side by side. It will impress your family and 
friends as well, who will believe after 
visiting you and playing with your computer 
that you're some kind of natural computer 
genius (which you probably are). 
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CHAPTER TWO — 
MOVING GRAPHICS 


There is little doubt that moving graphics 
games, such as the ones you See in arcades, are 
among the most exciting things you can do with 
your computer. Although the programs we create 
in this section of the book will be in no way 
as sophisticated as arcade’ games, the 
techniques given will allow you to write moving 
graphics games of your own, and will give you 
an insight into arcade-standard programs. 


THE SECRET OF ANIMATION 


It is simple to make something appear to move 
on the computer screen. You put a shape — such 
as the letter A - on the screen in a particular 
spot, and hold it there for a moment or two. 
Then, you print a blank space where the A was, 
and at the same time, reprint the A ae_=e short 
distance away from its original position. 


This process is repeated over and over again, 
and it creates the impression that the object 
is moving. That's all there is to it. Put one 
moving object under your control, and another 
one under the computer's control, and you have 
the raw ingredients of a game. Let's see how 
it works in practice. 


USING PRINT @ 


As you know, the computer's screen is 32 
characters across, and 16 Lines down. The PRINT 
@ command works by counting the very first 
position on the screen (the one in the top, 
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Left hand corner) as number 0. It counts across 
the Line, and then gets to position 31 at the 
end of the Line. Position 32 is the first one 
on the second Line. This goes right through the 
screen with the final position lin the bottom, 
right hand corner) as position number 511. 


We'LL start by placing something on the screen. 
Enter this brief program and run it. When you 
see the question mark appear, enter two 
numbers separated by a comma. The first is the 
number of lines down you want the object’ to 
appear, and the second is the number of Spaces 
you want the object to be across the _ screen. 
The first number must be between O and 15, and 
the second number between O and 31. 


Enter the program, run it for a while, then 
return to the book: 


1G REM PRINT @ DEMO 

20 CLS 

30 INPUT A,B 

40 PRINT 2 (324A+B), "A" 
50 PRINT 2 0,; 

b0 GOTO 30 


Note the use of the formula in Line 40, which 
changes the numbers entered as down and across 
co-ordinates into a single number which the 
PRINT @ command can use (Later on we'LL use a 
similar formula for PEEK and POKE, but we'll 
stay with PRINT @ for the time being): 


PRINT @ (32*A + B) 


You'LL find you're using this formula, or a 
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similar one to it, time and time again in 
programs. 


We'LL now use PRINT @, and our formula, to 
create a bouncing ball program. NEW the 
computer, and enter the following program, then 
return to the book for a discussion on it. 
You'il find that the techniques used for 
animating this baLlL will be used in just about 
every moving graphics game you write. So, it is 
worth taking the trouble to understand exactly 
how it works, so you can apply the’ techniques 
to your own programs. 


10 REM BOUNCING BALL 1 
15 CLS 


20 A=4:B=11 

50 Y={:k=1 

40 EAA: ER=B 

60 PRINT @ (3248 + A), "0" 
70 B=B+x 

G0 A=AtY 

90 IF A<2 THEN ¥=-¥ 
100 IF A?30 THEN ¥=-¥ 
110 IF B¢Z THEN X=-X 
120 IF B14 THEN X=-x 
130 GOTO 40 


When you run this, you'Ll see the ball appear 
on the screen, bouncing from the sides, and 
Leaving a trail of itself behind. I 
deliberately did not erase the ‘old’ ball in 
this program, so you could see that it was just 
a series of the same character being printed on 
the screen. 
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Now, add this Line, and see what happens: 
125 PRINT @ (32$EBR + EA),"." 


When you run the program, you'Ll see something 
Like this on the screen: 


As you can see, it leaves a trail of dots 
showing where the ball has been. Remove’ the 
dot from between the quote marks in Line 125, 
and run the program again, to see a true 
bouncing ball. 


The program gives a very good impression of 
a moving object. This program, as I said 
earlier, demonstrates a number of key things 
about moving graphics programs, so we'll go 
through this program Line by Line, explaining 
what each Line is doing. 
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15 - clears the screen 


20 — sets the start position of the ball, at 7 
across and ‘te down 


30 ~- sets X and Y which control the change in 
position of the ball between each movement 


40 - sets two variables used to erase the old 
position. These are called EA (for ‘erase A') 
and EB ('erase B). You should always use 
variable names which suggest the function the 
variable is performing, as it makes it~ much 
simpler Later on when you're going through a 
program. Note (and this is important) EA and EB 
are set equal to A and B just before the ball 
is printed at 32*B + A (line 60) and before A 
and B are modified {lines 70 and 80) 


60 - this prints the ball on the screen 

70 — B (the down position) is changed 

80 - A (the across position) is changed 

90 this checks that the A position is not too 
far to the Left, and if it is, changes Y to 
minus Y (causes the ball, next time it comes to 


this line, to bounce off the Left hand side of 
the screen) 


100 — does the same for the right hand side 
110 ~ checks the up/down position, and if the 


ball is too close to the top of the screen, 
changes X to minus X which, as you'd guess, 
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causes the baLl to bounce down from the top of 
the screen 


120 - does the same for the bottom of the 
screen 


125 - prints a blank on the ‘old’ position of 
the ball (that is, the position designated by A 
and B before they were modified by lines 70 and 


80) 


130 - sends action back to Line 40, where EA 
and EB are set equal to the ball's new 
position, before it is reprinted in the new 
position with Line 60 


Although this explanation is fairly long (and 
much Longer than the program it is explaining) 
it is worth reading it through carefully. Once 
you understand it, you'Ll be well on the way to 
writing your own programs. 


Now, modify the program so it is as follows. In 
this version, there is a little object at’ the 
bottom of the screen which is your 'bat' = and 
you have to get the ball to bounce off it to 
keep the ball moving. You use the 'Z' (to move 
Left} and the 'M' (to move right) keys to 
control the bat at the bottom. 


10 REM BOUNCING BALL 11 
15 CLS 


20 A=6:B=11:F=11 

30 Yei:k=1 

40 EA=A: EB=B 

UO PRINT @ (477+F)," "sCHRS(ISi);" * 
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60 PRINT 9 (32B + A), "0" 
70 B=B+X 

B0 ASAtY 

8? AS=INKEY$ 

95 IF Ag="Z" AND F)3 THEN F=F~2 

Bb IF A$="N" AND FC29 THEN F=F+2 

90 IF AC? THEN Y=-¥ 

100 IF A330 THEN Y=-¥ 

110 IF B¢2 THEN X=-¥ 

120 IF B13 AND ABS(F-A)<3 THEN X=-¥ 
121 IF B=16 THEN END 

125 PRINT 3 (324EB + EA," " 

130 GOTO 40 


Now, this is not a particularly satisfying game 
(it probably doesn't even deserve the title 
'game') but it shows some extra ingredients 
you'll be using in moving graphics games. In 
this program outside interaction is brought 
into play for the first time (you moving the 
bat) and the computer responds to this (keeping 
the game underway if the bat is in the right 
position). 


Here's what the extra Lines do: 


20 - F is the position of the bat across’ the 
screen | 


50 — this prints the 'bat' (and you can use the 
graphics character direct from the Y_ key 
instead of CHR$(131)}) and note there must be two 
Spaces within the quote marks on either’ side, 
to 'unprint' the bat as it moves) 


82 - this reads the keyboard, with INKEY$, and 
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sets the result of this reading equal to A$ 


85 -~ if A$ equals "Z" (that is, if you are 
pressing the "Z" key) and F is greater than 3, 
the value of F is reduced by 2 


86 - if A%& equals "M" and F is Less than 29, 
then the value of F is increased by 2 


(The effect of these two Lines, as I'm sure you 
can see, is to move the bat in accord with 
your wishes.) | 


120 - if B is greater than 13 {which means’ the 
ball is near the bottom of the screen) the 
position of the bat is checked, and if it is 
close to the ball, a bounce occurs and the game 
continues | 


121 - if the ball has missed the bat, this Line 
halts the program 


This ig not, as we said, a very inspiring or 
challenging game, but with a few minor changes 
can be given a bit of value. Modify it so it 
reads as follows, and play with it a bit: 


10 REM BOUNCING BALL 111 
12 REM * SQUASH’ 


15 CLS 

17 PRINT 9 224, "---eee one n nnn nnn H 
18 FOR J = 256 TO 449 STEP 32 

19 PRINT 2 J,’ > CU SNEYT 
20 A=O:B=li:F=11 

cg SC=] 

30 Y=tsX=1 
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40 EA=A:EB=B 

90 PRINT @ (477+F)," "SCHR#UIS1)3" * 
60 PRINT @ (3288 + A), *E" 

70 BEBtX 

80 A=AtY 

82 AS=INKEYS 

85 IF A$="Z" AND F>@ THEN F=F-2 

B46 IF AS="N" AND F¢24 THEN F=F+2 

90 IF Ax? THEN Y=~Y 

100 IF A>23 THEN Y=-¥ 

110 IF Be THEN X=~X 

120 TF B=13 AND ABS(F~A)<2 THEN X=-X 
121 IF B=i6 THEN END 

122 IF B13 THEN SC=SC+367:PRINT @ 68,"SCORE IS “;SC 
125 PRINT @ (328EB + EA),” * 

130 60TO 40 


Again you'll have to use the "Z" and "M" keys, 
but this time you have a much smaller’ 'playing 
field' and there is a bit of a challenge to the 
game. You might Like to spend some time 
playing with this program, modifying it as you 
See fit, before returning to the book to 
discuss moving an object up and down, as well 
as to the right and left, on the screen. 


TRAPPER 


We now have a program which is difficult (and 
very enjoyable) to play, as the 'X' is stalked 
by the prehistoric '@', 


In this program — TRAPPER — you are the "X" and 
the computer controls the "@", You use. the 
following keys to move yourself around the 
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screen, trying to stay out of the computer's 
clutches for as Long as possible: 


- to move up 

to move down 

- to move Left (see arrow above this key) 
, — to move right (see arrow) 


= WN > 
| 


10 REM TRAPPER 
15 CLS: T=0 
20 BA=5:BD=3 
30 THELSs TV=15 
40) EA=BA:ED=BD 
o0 EH=THIEV=TV 
50 PRINT @ (32"ED+EA),* ° 
70 PRINT @ (32Z9TV+TH)," ° 
BO AS=INKEY$ 
90 IF A$="A" AND BD?2 THEN BD=BD-! 
100 IF A$="Z7" AND BD<14 THEN BD=BD+! 
110 IF Ag="," AND BAC30 THEN BA=BA+! 
120 IF A$="4" AND BA?2 THEN BA=BA~1 
130 PRINT & (S24BD+BA), “K" 
33 TF RND(Q}7.5 THEN 150 
140 TF BOSTV THEN TV=TV+l 
145 TF RND(O)}?.5 THEN 140 
io0 TF BO<TY THEN TV=TV-1i 
su IF RND(O}?.5 THEN 170 
150 TF BACTH THEN TH=TH-1 
170 IF BA>TH THEN TH=TH+! 
130 PRINT @ (323TV+TH),"o" 
195 T=T+! 
170 PRINT 2 0," TIME ELAPSED"T 
210 IF BD=TV AND BA=TH THEN SOUND RND(G)820,1:60T0 210 
220 GOTO 40 


20 


There iS no need to go through this’ program 
Line by Line, as I'm sure by now you've got a 
pretty good idea of what effect the various 
parts of the program have. The main difference 
between TRAPPER and SQUASH is that we are now 
moving in two dimensions, and the thing which 
is trying to trap us can 'sense' (using Lines 
135 to 170) just where we are. The lines 135, 
145 and 155 are just to give you a chance. Take 
them out, and you'll be dead within 10 moves, 
every single time. 


This program points up one of the disadvantages 
of working in BASIC, especially with PRINT @ — 
it is fairly slow, and everything we add to a 
program slows it down further. Fortunately, 
there iS another way to move things on the 
screen, and we'Ll turn to that now. 


PEEK and POKE 


Although PEEK and POKE seem to inspire’ fear 
into programmers’ when they first come across 
them, there is no need to worry. They can be 
used in almost exactly the same way as PRINT @ 
has been used, | 


There are, however, two advantages of using 
PEEK and POKE over using PRINT @: 


~ POKE is faster than PRINT @ 

~ PEEK can be used to find out what is on 
the screen in a particular position. This is 
ideal for discovering whether or not an alien 
has been shot, or the plane you are flying has 
hit the side of a mountain 
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When you POKE something to the screen, you put 
it on the screen. When you PEEK, you are 
Looking to see what is on the screen at the 
particular position. That's just about aLl you 
have to remember. 


If you have two co-ordinates A (for across) and 
D, you PRINT @ them, as explained before, using 
the formula 32*D + A. To POKE something into 
place, you use a Line Like: 


POKE 28672 + 32*D + A, X 


We generally use 28672, the location of the top 
Left hand corner of the screen, or 28736, the 
position two lines below it. The X is. the 
character number, and this is the character 
which will appear when we POKE directly t the 
screen, | 


You'Ll remember that we used a space ("") in 
PRINT @ to wipe something out. The equivalent 
in this case is the number 32. So... 

POKE 28672 + 32*D + A, 32 

.».1S the equivalent of ... 


PRINT @ (32*D + AJ," " 


If you want to find our what is at a particular 
address, you use PEEK as follows: 


IF PEEK (28672 + 32*D + A) = .... THEN .... 


Now, PEEK and POKE are simpler to use than they 
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may appear at first sight. I suggest you enter 
the following programs, all of which use the 
two commands, and follow through the - Listings 
carefully. This will allow you to Learn about 
the use of the two words more quickly than’ any 
other way. 


MESOZOIC ATTACK 


The Mesozoic Era was when dinosaurs roamed the 
earth. This program is a PEEK/POKE version of 
TRAPPED (although onLy POKE is used, to break 
you into the new words gradually). Note’ that 
although up and down are the same keys ("A" and 
"Z") right and left are "," (Left) and "," 
(right). It is easy to remember these, as the 
greater than and less than symbols point in the 
relevant directions. 


10 REM MESOZOIC ATTACK 

iS H5= 

20 CLS 

30 §C=0 

40) HA=1:HD=1:D=15:A=30 

39 EA=HA:ED=HD 

60 IF INKEY$="8" THEN HA=HA-1 
7G IF INKEY$="2" THEN HA=HAtI 
BO IF INKEY$="." THEN HD=HD+1 
90 IF INKEY$="," THEN HD=HD-1 
91 IF HAC1 THEN HA=! 

92 IF HA+15 THEN HA=15 

G3 IF HD<i THEN HD=1 

G4 TF HDP31 THEN HD=21 

55 ER=58 

iG SB=28672 + 329D+A 

{{G IF SB=H THEN GOTO 1006 
115 POKE €B, 32 
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120 POKE SB, (JO+INT(RND (0) $3) } 
130 H=28672 + 32SHA+HD 

140 IF SB=H THEN GOTO 1000 
145 POKE EH, 32 

150 POKE H,98:EH=H 

160 IF DCHA THEN D=D+! 

165 IF RND(O)3.3 THEN 180 
170 IF DHA THEN D=D-1 

175 IF RND(O)).3 THEN 190 
180 IF ACHD THEN A=A+! 

190 IF ADHD THEN A=A-I 

200 SC=SC+1 

210 PRINT 9 20,"TINE}*SC 
240 IF D<1 THEN D=1 

250 IF D)15 THEN D=15 

260 IF ACL THEN A=! 

270 IF AY31 THEN A=31 

275 IF SB=H THEN 6070 1000 
780 60TO 50 

1000 POKE SB,32:POKE H,32 
1001 POKE EB,32:POKE EH, 32 
1002 FOR J=1 TO 19 

1003 POKE SB, (80+INT(RND(O) #20) ) 


1010 SOUND RND{20)+1,1 

1020 NEXT J 

1030 PRINT @ 226, "YOU SURVIVED FOR"; SC 
1035 IF SC7HS THEN H5=5C 

1040 PRINT @ 258, "BEST SQ FAR 1S°3HS 
1050 FOR T= 1 TO SQO:NEXT T 

1040 GOTO 20 
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V-WING SPACE BATTLE 


In this program, you pilot your Little V-wing 
space craft around the screen, trying to run 
over the numbers which appear on it. Each 
number will appear for a Limited amount of 
time, and if you run over it, a score related 
to that number is added to your growing tally. 


PEEK is used here for the first time, in Line 
190, where it Looks at the position where your 
space craft is about to be POKEd, and if it 
finds a number there, increments your score. 


10 REM V-WING SPACE RATTLE 
29 CLS 


30 SC=0 
100 FOR Z= 1 TO 20 

110 SL=28736:N=22sD=-32 

120 POKE 28715+INT(RND (0) #468) , INT (RAD (0) 49) +49 

130 WeSL 

140 AS=INKEYS 

150 IF AS="," THEN SL=SL+1:4=42 

160 IF A$="4" THEN SL=SL-1:4=40 

170 IF A$="." AND SL328736 THEN SL=SL-32:H=1 

180 IF AS=""" AND SL¢29151 THEN SL=SL+32:M=22 

190 Q=PEEK (SL) 

200 IF @248 AND Q<58 THEN SC=SC+Q:60T0 980 

205 POKE W,32 

210 POKE SLM 

220 IF RND(O)<.99 THEN 130 

230 COLOR, 1:FOR T=17020:NEXT T:COLOR, 0 

990 CLS:PRINT 2 0,"SCORE °;5Cs"  "320-Z;" SHIPS LEFT" 
982 COLOR, INT(RND(0) $2) 

985 SOUND RND(O)%25+1,1:1F RND(O)>.6 THEN 985 

990 NEXT 2 
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1000 PRINT 2 0,"THE BATTLE [5 OVER’, "YOU SCORED ";SC 
1100 COLOR, INT(RND (6) 82) 
1120 GOTO 1100 


BREAKOUT 
As you can see, the programs are getting more 
involved. BREAKOUT produces a screen picture 
Like this: 

EE HE PEPE HE He FE EE HEE EE HE HE hE PH HE HE HE EE 


X K K K X K K X € K KR KX K XK K 


x ns x a x : i] x 4 x 4 cs] a t ] x i x a 
Mo: RS ee OR eS Rw Ale OA CR me OS 
XK & x x 


THE GAME IS OVER 


YOU SCORED Silieba 
SCORE Tait 4 BALLS 0 


You have to knock as many bricks (the X's) out 
of the way as you can, trying to get through to 
the row of hash symbols near the top of the 
screen, PEEK is used (see Lines 140 through to 
146} to check whether you've hit a brick (140, 
144 and 146) or the hash symbols (145). Your 
bat at the bottom of the screen is POKEd into 
position by Lines 225 and 230 (with the two 
POKE 32's clearing each side of the bat). 
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10 REM BREAKOUT 
15 CLS 


2) PRINT UHHH? 
QU PRINT" XXX XXX YK KXKK KEK? 
ZOPRINT*X XX .X.N KEYG! 

AO PRINT" X.X X.Y K EKA! 

SO PRINT "XX XXXL AKAN KANE 

60 CX=10:REM NO. OF BALLS 

70 BATINT(RND(0)46)+4:REM START OF BALL ACROSS 

90 BD=8: REM START OF BALL DOWN 

B2 F=5 +INT (RND(O)410):REM START OF BAT ACROSS 

a5 X=1.4:¥=! 

90 EA=RA:ED=BD:REM ERASE BALL 

100 POKE 286724 (324ED+EA) ,32 

110 POKE 28672+(328BD+BA) ,48:REM PLACE BALL 

115 EASBA:ED=BD:REM ERASE BALL 

120 IF BA}30 OR BACL THEN GOSUB 1000 

130 IF BDD11 THEN GOTO 2000 | 
140 IF PEEK (28440432¥BD+BA)=24 THEN GOSUB 3000:60T0 150 
144 IF PEEK (286404324BD+BA+1)=24 THEN GOSUB 3000:60TO 150 
145 IF PEEK (28640+32%BD+BA)=35 THEN GOTO 4000 

144 IF PEEK (28640+328BD+BA-1)=24 THEN GOSUB 3000 

{50 BA=BA+K 

160 BD=BD+Y " 

200 ASSINKEYS 

210 IF AS="Z" THEN F=F-1 

220 IF Ag="N” THEN F=F4 

222 IF F¢L THEN F=! 

293 IF F330 THEN F=30 

225 S=290804F 

230 POKE S-1,32:POKE S+i,32:POKE 5,140 

500 6OTO 100 

1000 Y=-x 

1200 RETURN 

2000 IF ABS(F-BA) 2 THEN 2500 

2005 ¥=-¥ 

2200 GOTO 140 
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2500 CX=CX~t 

2505 IF CX=0 THEN PRINT @ 288, "THE GANE IS OVER" 
250 IF CX=0 THEN PRINT @ 352,"YOU SCORED "sSC 
2510 PRINT @ 480, SCORE ";SC;" BALLS "3CX 
2520 PRINT 9 416," . 
30 PRINT 2 384," 
35 IF CX=0 THEN 4020 

37 FOR T=1 TO {0:SOUND T,1:NEXT 

40 BA=INT(RND(0)%6)+4:REM START OF BALL ACROSS 
50 BD=8: REM START OF BALL DOWN 

b0 F=5 +INT (RND(O)$10):REM START OF BAT ACROSS 
70 GOTO 90 

(0 POKE (28640+324BD+BA) , 32 

3001 IF RND{O)>.8 THEN POKE (28640+324BD+BA+1) , 32 
3002 IF RND(G)<.1 THEN POKE (28640+324BD+BA-1) ,32 
3010 SC=SC+437 

3020 PRINT 2 480, "SCORE "sSC 

3030 COLOR, {:FOR T=1TOS:NEXT:COLOR, 0 

3035 Y=-¥ 

3040 RETURN 

4000 PRINT @ 288, "VOU HAVE DONE IT!* 

4010 PRINT 9 352,"YOU SCORED "sSCECx 

4020 REM END OF GAME 

4025 FOR T = 10 TO 30 

4030 SOUND T, 1! 

4040 NEXT 

4050 RUN 


PLAGUE SPOT 


Zu 
20 
20 
29 
eg 
25 
25 
50 


In this gripping game, you have to work 
yourself fa graphics symbol, shown as the $ in 
the sample printouts) from the top teft hand 
corner of the screen to the bottom right hand 
one, 


The plague spots (the X's) are constantly 
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increasing as the game goes on, and each time 
you hit one your score will increase. You have 


to 


get 


to the safe spot in the bottom right 


hand corner with the Lowest possible score. 


Here are a few 'Snapshots' of it in action: 


F350 XXXXXXKKXXKXXXKXXXXNXKXXKXX 
x x X X 
KA 4 x x ¥ 
2 x x xX Xx 
x K xX xX x 
it x x 
x x x x 
XK XX x 
x x x xX x x 
XX x #X xX xX Xx 
mo x X X XK X 
x x x x x 
x x XX X 
x x 

XK 940 XXX NXXXXXXXXXAX XXX KXXXKMX 

XXXXXXXXX y x X Xx 

a. . x x xX 

x XxX xX X x oe 

x x x X x 

x Xx x 

X x K x 

x x xX x 

X x X x X 

XX KX x x xX xX 

x x x xX X XX X 

x K xX xX x 

x x XX xX 

; x 

XX X XX XX XK XX 

XK XXX XX XXX XK KKK MK X XXX XXX KX KAAKX HH 
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There is a high score feature, so you can try 
and get a better (that is Lower) score’ each 
round. You'll find that adding a high’ score 
touch Like this one will enhance many games. 


10 REM PLAGUE SPOT 

15 HS=9999999 

20 CLS 

30 SC=0 

35 BS="." 

4O PRINT & 0, “XXXXXXAXXXKXXX CARNAL R Ks 

50 FOR J=31 TO 447 STEP 32 

b0 PRINT *X | x" 

70 NEXT J 

BO PRINT 9 480, "XXXXKLXXXXXAMAXKKKK LIK X KAAS $9 "3 

110 SL=28736 

120 FOR T=1 TO 30 

130 Z=28715+INT{RND (0) £448) 

140 POKE 7,24 

150 NEXT T 

{40 W=SL 

170 AS=INKEYS 

175 IF A$<)"A" AND AS4)"Z* AND ASC3"," AND AS<)"." THEN AS=BS 
176 BS=A$ 

180 IF AS="." THEN SL=SL#i:IF PEEK (SL)=24 THEN GOSUB 1000 
190 IF A$="," THEN SL=SL-1:IF PEEK (SL)=24 THEN GOSUB 1100 
200 IF A$="Z" THEN SL=SL+32:IF PEEK (SL)=24 THEN GOSUB 1200 
210 IF A$="4" THEN SL=SL-32:IF PEEK (SL)=24 THEN GOSUB 1300 
215 IF SL <28472 THEN SL=28472 

216 IF SL 329183 THEN SL=28672 

219 IF PEEK(SL)=36 THEN 5000 

220 POKE W,32:POKE SL, 137 

230 POKE 28715+INT(RND(O) #448) , 24 

500 GOTO 160 

1000 SOUND 1,1 

1010 SL=SL-1 

1020 SC=SC4 
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1030 GOTO 1500 
1100 SOUND 4,1 

1110 SL=SL+i 

1120 SC=SC+1 

1130 GOTO 1500 

1200 SOUND 8,1 

1210 SL=SL-32 

1220 SC=SC+ 

1300 SOUND 12,1 

1310 SL=SL432 

1320 SC=SC+1 

1500 PRINT @ 0, 1000-10¥SC;" * 

1505 IF SC}99 THEN 5000 

1510 RETURN 

5000 FOR T=1 10 5 

5005 PRINT 2 476, “H##" 

5010 PRINT 3 509, "***" 

5020 SOUND RND(19)+1,1 

5030 PRINT 9 476,°***" 

5040 PRINT @ 508, "#8" 

5040 NEXT T | 

5070 IF SCCHS THEN HS=SC 

5090 PRINT 2 192," YOUR SCORE WAS ":1000-108SC 
5100 PRINT 2320," BEST SO FAR IS "s1000-108HS 
5120 FOR T=1 TO {5:SOUND T,1:NEXT 

5130 6070 20 


Finally, here are the character codes to use 
for PEEK and POKE: 


0 @ 16 P 32 48 0 
1A 17 Q 33 | 49 1 
e B 18 R 34 " 50 2 
3 C 19 §& 35 # o1 3 
4 D 20 T 36 $ se 4 
5 E 21 U 37 03 5 


3T 


O22 2s TA CH ITH TN 
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32 


+ HY R =m 


O oN M 


IY Il A we es 


CHAPTER THREE — 
USING MODE 1 


As you know, your computer iS equipped with two 
graphics modes, MODE (0) (which it is in 
automatically when you first turn the computer 
on) and the high resolution mode, MODE (1). 
We've been using MODE (0) to date, so it's 
about time we had a look at the other one. 


SPIROGRAPH PATTERNS 


Spirograph patterns are formed by both the 
interior and exterior epicycloid curves. One of 
the formulae for such a curve is given in Line 
100 of the first program in this section, in 
which A is the radius of the large circle, B is 
the radius of the small circle, and H is’ the 
point on the circumference of the small circle. 


The program here chooses A, B and C at randon, 
then traces out the shape on the screen. The 
finished pattern is held for a moment, then the 
process begins again. 


If you don't Like a particular pattern which is 
forming for you can't see one at all, which 
happens with some combinations), just press any 
key anda new design will begin. Some of the 
results of thiS program are very, very 
attractive indeed. You'll find the patterns 
Look best if viewed from a slight distance. 
ThiS program is based on one written by Keith 


Hewson. | 
10 REM SPIROGRAPH 


15 PI=3. 141992 
20 MODES) 
20 COLOR INT{RND (0) $3) +2 
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30 IF INKEY$¢>"" THEN 30 

AQ A=INT(RND (0) 415) +1 

00 B=INT(RND (0) $15) +1 

60 H=INTCRND (6) 915) +1 

70 FOR J=0 TO SaPI/i.? 

BO FOR T=0 TO 24PI STEP PI/60 

99 X=(A-B) &CO5 (1) +HICOS ( (A-B) tI /B+J) 
99 TF INKEY#¢>"" THEN RUN 

100 Y=(A-B) aSIN(1) HSIN ((A-B) a1 /B+d) 
110 SET ((60+K), (32+¥)) 

120 NEXT I 

130 NEXT J 

140 FOR T=1 TO 1000 

130 NEXT T 

160 RUN 


LISSAJOUS FIGURES 


Jules Antoin Lissajous, a French physicist who 
Lived from 1822 to 1880, made a study of the 
movement of particles under the action of 
periodic motions acting at right angles to each 
other. He discovered that bodies moving in this 
way trace intricate patterns as they dance 
around each other. This program, based on one 
written by Frazer Melton, shows what Lissajous 
discovered. 


As in the SPIROGRAPH program we've just looked 
at, SET is used to plot the points on the 
screen, tracing out the path of the sum of the 
periodic motions. 


The delightful design produced on the _ screen 


can be used in a number of ways. One way is to 
compare two frequencies. If they are the same, 
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the program will draw a circle. If they are 
different, the number of points where the 
curve touches either the vertical or horizontal 
edge is the ratio of the two frequencies. If 
fi is the known frequency, then the unknown 
frequency (f2) is equal to the number of times 
the curve touches the vertical edge of the 
confining box, multiplied by the known 
frequency. 


Here are some examples of the effects’ the 
program can produce. Of course, they are far 
more attractive in color on the screen than the 
printouts suggest. 


x 

” 
oo 
af 
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of STEP and X and Y frequencies. 
be around 50 or more if the X and Y frequencies 


ah, 
[ at ie 


1 


_ = ie : . ge = = = 
“_. | a = 
s - = 7 2 . =z 5 
‘= . ss . "3 
al | -_ ™ = = Z *, 
fs es, as * 8 
r = & “ “s & Pat 

is 7. 
ae pitte, “2 
baa il pitrtars 


two versions of the program. 
one allows you to enter your own 
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STEPs should 


are in single figures, and correspondingly more 
as the size of the frequencies increases. The 
higher the step number, the greater’ the 
resolution of the final figure. 


Enter this program into your computer: 


10 REA LISSAJGUS FIGURES 
20 REM FRAZER WELTON 


22 PI=5,141592 

2g CLS 

3Q INPUT "STEPS";§ 

34 REM ENTER ’0’ TO END 

33 IF S=0 THEN END 

40 INPUT "Y FREQUENCY";:Y 

oQ INPUT "X FREQUENCY"; X 

80 MODE (1) 

B2 Z=INT(RND(0)43) +2 

85 COLOR (7) 

90 FOR A=O TO 2¥P] STEP PI/S 
100 SET ({2085IN(ARY) +40) , (208005 (ARX) +30) ) 
110 NEXT A 

120 FOR T=1 TO 2000:NEXT 

130 RUN 


Try the following sample values with this 
program: 


STEP Y FREQUENCY X FREQUENCY 


oO) 
© 
on @O-oaqn— 
O71 O1 


hPAOMM A - 
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500 — 18 6 


500 4 12 
200 8 4 
250 3 8 
900 20 8 
500 15 20 


The next program chooses the two frequencies at 
random, between one and 20. The step size is 
fixed at 500, but there is no reason why you 
should not change that if you wish. There is a 
slight pause at the end of each figure and then 
the screen clears, and a new figure begins. 


10 REN AUTO-LISSAJOUS 

2 REA FRAZER NELTON 

22 PI=5, 141592 

50 $=300 

40 Y=INT(RND (0) $20) +1 

oO X=INT(RND (OQ) £20) +! 

80 MODE (1) 

B2 Z=INT(RND (0) $3) +2 

85 COLOR (7) 

90 FOR A=0 TO 24P1 STEP PI/S 
100 SET ((20aS5IN(ASY) +40), (208005 (A8X) +30) ) 
105 TF INKEY$<3"" THEN 40 
110 NEXT A 

120 FOR T=1 TO 2000: NEXT 

130 GOTO 40 


This final version is simply a modification of 
the preceding program, in which the screen does 
not clear between each image, so eventually 
you'LL end up with a very complex overlay of 
designs. 
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10 REM AUTO-LISSAJOUS 

20 REM FRAZER MELTON 

2t REM MOVE LINE 80 TO 25 SO WILL NOT ERASE 
22 PI=3. 141592 

eo MODE (1) 

50 5=500 

AQ Y=—ENT(RND (0) 420) +1 

JO X=INT(RND (0) #20) +1 

B2 Z=INT(RND(0) #3) +2 

85 COLOR (2) 

90 FOR A=0 TO 24F1 STEP PI/S 

100 SET ((208SIN(ARY) +40), (208C05 (A8X) +30) ) 
103 IF INKEY$¢>"" THEN 46 

110 NEXT A 

120 FOR T=1 TO 2000: NEXT 

130 6070 40 


As you know, the SET command is used to place 
dots of light on the screen at a_e position 
specified by the numbers which follow the 
command. 


SET (X,Y) places the dot at location X (which 
can be zero to 127; the distance across’ the 
screen from Left to right) and Location Y fla 
number from zero to 63; the count down the 
screen). 


The next program, MARTIAN LACE, uses SET to 
produce a balanced (Cand highly attractive) 
picture on the screen. As you'Ll see when you 
run it, the design evolves perpetually. 


10 REM MARTIAN LACE 
gO MODE (1) 

BO X=INT(RND (0) 463) +1 
70 Y=INT(RND (0) &51) +1 
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BO Z=INT(RND(0) $4) +1 

Q5 IF RND{O)>.3 THEN Z=1 
90 COLOR (7) 

{00 SET (X,Y) 

110 SET (128-X,¥) 

120 SET (128-X, 64-¥) 

130 SET (X,64-Y) 

160 GOTO 40 


MARTIAN LACE is also used in the MAGIC 
COMPOSER program in the chapter on sound. 


THE MOTION PICTURE MAN 


You can use the computer as a kind of ‘'‘'etch-a- 
sketch’ toy in Mode 1. You enter a number (2, 3 
or 4) to select the color you want, then use 
the cursor keys (the ones with arrows on them) 
to draw designs of your choice on the screen. 
The image begins in the top Left hand corner of 
the screen, 


As well as responding to the arrow keys, the 
program accepts, and acts on, the following 
commands: 


C - copies picture created to some printers 
(such as the Seikosha GP-100 or GP-100A) 


R —- runs the program again from the beginning 


N — moves the cursor back to the start position 


m 
| 


freeze the picture 


S — stop the program 


40 


10 REM MODE 1 SKETCHER 

20 INPUT A 

30 MODE (1) 

40 COLOR A 

30 X=: ¥=0 

70 CH=INKEY$ 

80 IF C#="," AND X¢127 THEN X=X+1 
90 IF C$="8" AND X20 THEN X=X-1. 

100 IF C$="." AND YO THEN Y¥=Y-1! 

110 IF C$=" " AND Y<65 THEN Y=¥+1 
120 SET (X,Y) 

150 IF C$="C" THEN COPY 

140 IF C$="R" THEN RUN 

150 IF C$="N*" THEN 30 

160 IF C$="E" THEN 1000 

170 IF C#="S" THEN END 

190 GOTO 70 

1000 GOTO 1000 
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CHAPTER FOUR — 
MAKING MUSIC 


Although it may seem a Little Limited, the 
SOUND command on your computer is capable of 
producing some quite interesting effects. 


The SOUND command is followed by two numbers. 
The first is the pitch fa number from 0 to 31, 
with O being a rest and 31 the highest note the 
Computer can produce). The second is_ the 
duration (from 1 to 9, with 1 being the 
shortest). 


We can use the computer to play all its notes 
with the following program, SOUND DEMO: 


10 REM SOUND DEMO 
20 FOR T=1 70 3 
20 SOUND 1,1 

40 NEXT 


When you run this program, you'Ll hear all the 
notes played from the Lowest A (note 1) to the 
highest D# (note 31). 


COMPOSER ANDROID 


The computer can also be programmed to' choose 
notes at random and create some rather hopeless 
‘electronic music! as COMPOSER ANDROID 


demonstrates: 


10 REM COMPOSER ANDROID 

20 DURATION=INT(RND (0) &2+1) 
SO PYTCH=INT(RND(O) #231) +1 
4) SOUND PITCH, DURATION 

3 GOTO 20 


43 


As you'LL hear, this is not very tuneful. It is 
possible, however, to write a program which 
sticks to one key (C) and manages to make 
noises which are much more deserving of the 
adjective 'musical'. Our next program, MAGIC 
COMPOSER shows this convincingly. You'Ll see 
that the program also creates a pretty design 
on the screen as the music unfolds. The design 
part of the program is explained in the 
previous chapter of this book, on page 39, 
where it is called MARTIAN LACE. 


10 REM MAGIC COMPOSER 
15 DIM AC1f) 

20 FOR 7=1 TO 11 

30 READ ACZ) 

40 NEXT 

50 MODE (1) 

40 X=INT(RND (0) #43) +1 

70 Y=INT(RND (0) 931) +1 

GO Z=INT(RND (0) #4) +1 

90 COLOR (2) 

100 SET (X,Y) 

110 SET (128-X,¥) 

120 SET (128-%,64-Y) 

130 SET (1,64-Y) 

140 XSINT(RND(O) £11) +4 

145 IF X= OR X37 THEN N=2+INT(RND(O)#4) ELSE Net 
150 SOUND A(K),M 

160 GOTO 40 

1000 DATA 28,27, 25,23, 21,20, 19, 16,16, 4,28 
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ORGAN 


If you'd prefer to create your own music, 
rather than Let the computer do it, you can use 
the next program, ORGAN, with which to unleash 
your creative powers. 


When you first run the program, an input prompt 
will appear. In response to this question mark, 
enter a number between 1 and 9. The Lower the 
number, the faster the ‘organ' will play. 


Here's the key to the notes you play. 


KEY NOTE 


=2Z2a0o<a QOXKN 
eranmoa 


: C! 
° D! 
Space E' 


10 REM ORGAN 

15 REM CHANGE A TO ALTER SPEED 
20 INPUT A: CLS 

30 CS=INKEY$ 

40 IF C$="2" THEN SOUND 4,A 

43 C$=INKEY$ | 

vO IF C$="X" THEN SOUND 6,8 

ga CS=INKEY$ | 

60 IF C$="C" THEN SOUND 8,A 
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65 CS=INKEYS$ 

70 IF C$="V" THEN SOUND 9,A 
75 CH=INKEY$ 

BO IF C$="B" THEN SOUND 11,8 
85 CH=INKEY$ 

90 IF C$="N" THEN SOUND 13,8 
95 CS=INKEY$ 

100 IF C$="N" THEN SOUND 15,A 
105 CH=INKEYS$ 

110 IF C$="," THEN SOUND 16,A 
1i5 CS=INKEY$ : 
120 IF C$="." THEN SOUND 18,4 
zu CH=INKEY$ 

130 IF C$=" " THEN SOUND 20,4 
135 IF C$=":" THEN END 

140 B0T0 30 


This organ is quite flexible. Here's the 
'music' of the folk song CLICK GO THE SHEARS to 
play on your organ. The music was’ transcribed 
by Peter Shaw: 


Ow a 
aqwa 
=x2azxXx 
oaoang 
<ON Ww 


O- xX<~«< 

x<~ XK 

N=ZOZz 
zx~z 


—_N ON 


Chorus 


pac 


qs 

ON z~ 
—<—~ 10 wo 
oo w~ 


Zzxrx~aZz. 
C2 
<« 
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CHAPTER FIVE — 
USING YOUR MEMORY 


With the aid of the additional plug-in memory, 
your computer can be used as a ‘real computer' 
in ways which were impossible (or, at best, 
inconvenient) on the unexpanded machine. 


Let me explain what I mean by that. Before you 
bought your computer, you probably imagined it 
would be extremely useful as a means of storing 
and processing Large amounts of information. 
There are several areas of practical use _ in 
both the home and small business in_= which 
personal computers have been employed. These 
inc lude: 


— maintaining details of a record collection 
- —- looking after your personal Library 
—- storing recipes 
—- maintaining personal financial records 
—- assisting in organising material for 
research projects 


However, if you had tried to create Long and 
Complex programs to do these — and similar 
tasks - on your unexpanded computer, you may 
have discovered that once you'd entered the 
program to hold and process your data, there 
was so Little memory left that the program was 
really only of use for demonstration purposes: 
"This program shows how the computer could act 
as a sorting and access aid for my _ record 
collection, if it had more memory". 
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When your computer was firs. released, there 
was Little software available for it. You 
probably know that commercial software 
developers always keep a sharp eye on new 
computers. If it tooks Like a computer is going 
to take off, then it is worth writing and 
marketing software for the computer. There is a 
Little of the ‘chicken and egg' situation here. 
A wide variety of software packages available 
for a particular computer can help a_ potential 
purchaser make up his or her mind regarding 
which machine to buy. 


You can now use your computer, with much of the 
software which is now available, as a_ cheap 
and very useful business or personal tool. 
There are some points to watch, however. You 
may well find that available programs suit your 
personal or business needs exactly. If that's 
the case, you just buy the program, load it in, 
and you're away. However, a program which works 
hand-in-glove with your present needs may, in 
the end, prove more of a handicap than a boon, 
as it may prevent you developing and expanding 
your activities as your needs change- and 
develop. | 


How can you avoid this problem? One way is to 
use commercial software -— or programs’ in 
magazines and books Like this one — as. the 
starting point for software tailored to your 
present, and anticipated future, needs. The 
other way, of course, is to write your own 
software from scratch, using the ideas you've 
learned by reading this book. 
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There are a number of areas where computers 
have found ready application in business, and 
your computer can certainly assist in this way 
with a small business. You'll find that, among 
other uses, you could develop programs. to 
assist with the following: 


— the payroll of a small firm can easily 
be managed with the aid of your computer 


- keeping an up to date inventory of the 
stock of a small: warehouse or shop is_ also 
possible, and provided that you choose ‘'codes' 
to represent particular items (rather than 
spelling out the name of each item in detail) 
you'LL discover you can keep aé_=e surprisingly 
high number of different products in- your 
inventory file 


- accounts work (both accounts receivable 
and accounts payable), along with such things 
as forecasting budgetary trends, are well 
within the capability of your computer, even 
for quite sophisticated and complicated work 


- word processing, after a fashion, can be 
managed on your computer 


So, additional memory allows you to exercise 
your computer in ways which could have been 
unrealistic, or inconvenient on the unexpanded 
machine. But, it does not stop there. The 
extra memory gives you access to memory space 
to write far more elaborate, and satisfying, 
games than may have been possible before. 
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We'LL Look briefly at some ideas for such games 
at the end of this chapter, but firstly we'd 
Like to mention another advantage of the 
additional memory; an advantage that applies 
equally to business and games programs. If you 
are constantly worrying about the possibility 
of running out of memory, you are unlikely to 
create your programs at your best, 


The extra memory can be used, not only for 
making the program more - elaborate and 
satisfying to use, but also in four important 
ways: 


- You can include full instructions, and 
very clear user prompts, so the user’ knows 
exactly what he or she is expected to do in all 
cases 


- Even if the instructions have been 
misunderstood, the extra memory can be used to 
advantage to add ‘error traps' to prevent a 
mistake by the program user causing the entire 
program to come to a grinding halt 


-—- The screen can be formatted in such a 
way aS to reduce the chance of such an operator 
error occurring with, perhaps, the bottom two 
Lines of the display being used only for user 
prompts, with these erased by two blank PRINT 
@ Lines after the prompts have been followed 


- The screen can also be formatted purely 
for visual effect, spreading the computer 
output around the entire screen to make it as 
easy as possible to read and understand it 
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These four suggestions apply — as we said —~ to 
any programs, whether they are for enter- 
tainment, instruction or business administra- 
tion. 


NASTY HABITS 


After you've cut your programming teeth on 
short, simple programs, you're sure to want to 
start writing Longer, more complex ones. When 
you do this, you may discover that many of the 
good habits you've Learned will desert you. 


If you're not worried about making a program 
tight and compact, you'Ll discover it is very 
easy to set up a long and sloppy set of 
IF/THENS which could easily have been replaced 
with a single IF/THEN sending action to a 
subroutine. When you have memory to spare, it 
often seems too much trouble to bother cleaning 
up your programs. 


Discarded subroutines can clutter up the 
bottom ends of the Listings, and GOTOs cover a 
multitude of situations which arose because you 
did not give sufficient thought to the highest 
Line number you might need. 


SURPRISES 


One of the best things you can add to a Longer 
Program is the element of surprise. If you can 
include situations which do not occur every 
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time a program is run, you'Ll be making sure 
that the game remains interesting for a much 
Longer time than might be the case if every 
situation was triggered every time the game was 
run. 


You may wish to use and adapt the simpler 
programs in this book, adding your own touches. 
Instructions, use of color and sound can all 
add to the value of the final program. 


Another way of improving programs, and making 
them interesting to users for a Longer time, it 
to use a feature you've no doubt seen in 
computer games before, the ‘degree of 
difficulty’. When you allow the player to 
select a degree of difficulty, make sure’ that 
the user input really does alter the standard 
of play. Ensure that, even at the highest Level 
of play, the final score (or successful Landing 
on the moon, or a tally of obliterated aliens 
or whatever) is attainable in practice. 


You could also add further interest to games by 
awarding paints, or scores, or ratings and the 
Like, which are genuinely related to _ the 
speed, skill, survival time or whatever’ the 
player demonstrated. A further twist is to 
award a ‘rank! (Like ‘star fleet commander’, 
'novice' or ‘incompetent fool') to the player, 
depending on how well he or she did. Points and 
ranks help to ensure that a player will remain 
interested in a game for a Longer time than 
might otherwise be the caSe. 


The use of a ‘high score’ is also a good idea. 
You can see high scores in a few programs’ in 


52 


this book such as MESOZOIC ATTACK. 


After you've been writing programs for a while, 
you'll realize that many of them run too fast 
to be good games without the use of a ‘delay 
subroutine’ (such as an empty FOR/NEXT Loop to 
slow things down). If the computer is meant to 
be thinking before responding to a move, it is 
more realistic for there to be a short pause 
before the computer replies, rather than come 
back instantly with itS move or answer. 


SPEED CONTROL 


In contrast to this, you may well find’ that 
very long, moving-graphics programs run_ too 
Slowly. You can ensure your program runs as 
fast as possible by starting with a GOSUB which 
jumps right over your main program to the end. 
In this subroutine, you assign variables, give 
the instructions, and so on. 


When the computer comes across a GOSUB or GOTO 
command, it starts at the very first Line of a 
program, then searches through, Line by Line, 
till it comes to the one it is Looking for. 
Therefore, if an often-called subroutine is 
near the start of the listing, rather than near 
the end, the computer will find it more quickly 
than would be the case otherwise. The saving in 
time is not dramatic, but every fraction of a 
second you can save in a moving graphics 
program adds to its effectiveness. 
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IDEAS FOR YOUR OWN GAMES 


The following List is by no means’ exhaustive, 
but should give you some ideas on the kind of 
programs you may be willing to tackle: 


CRIBBAGE: Sir John Suckling, who Lived from 
1608 to 1642, is credited with the invention of 
this game, an elaboration of the older English 
game of NODDY. If you enjoy cribbage, you'll 
probably enjoy the challenge of creating = an 
electronic opponent, which not only controls 
the cards, but also drawS a computer 
representation of the cribbage board on the 
screen, 


POKER: This, and many other card games, can be 
written using a deck of cards which is really 
the numbers one to 52, with one through 13 
representing, Say, the hearts, 14 through 26 
the diamonds, and so on. Once you have a simple 
version of poker up and running, you may want 
to elaborate it, to play one of the many 
variations of the game, such as BLIND TIGER, 
WHISKEY POKER, STUD POKER, SEVEN-CARD STUD, LOW 
BALL and FREEZEOUT. 


CHILDREN'S CARD GAMES: There is a wealth of 
games ideas in the field of children's’ card 
games and because they are generally much 
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simpler to play, with less subtle Strategy, 
you'LL probably find them easier to program 
than ‘adult' card games. 


Children's card games include: SLAPJACK, OLD 
MAID, PIG, GO FISH and BEGGAR-YOUR-NEIGHBOUR. 


BACKGAMMON : Although possibly man's’ oldest 
board game, the rules were not recorded in a 
systematic form until the middle of the 1700's, 
when the famous game writer Edmond Hoyle 
decided to write them down. Since then,’ the 
only significant change in the game (and one 
which certainly adds to its appeal) is the 
provision of the doubling cube. You'LlL find 
that Backgammon may be somewhat simpler’ to 
write than other board games of pure skill, 
because the use of dice introduces an element 
of chance into the game from which the computer 
can benefit. 


CHESS: While this may seem an impossible task 
at your present stage, you Can approach it by 
trying to write a kind of 'mini-chess' you 
invent. Your version of chess could be on a six 
by six board, instead of the standard eight by 
eight, or could use just four pieces for each 
side. When you start thinking about it, you'Ll 
realise that chess (and other board games, for 
that matter) is a fruitful field to look for 
ideas to turn into games for your computer. 


NINE MEN'S MORRIS: This’ game, named in 
Elizabethan times, is played on a simple board, 
but there is a wealth of strategy you can 
program into it. 


55 


CHECKERS: This, like Chess, can act as a source 
of ideas for variations. A 'mini-checkers'on a 
four by four board may be a good place to 
begin. 


ROULETTE: The most famous gambling game of them 
all — Roulette - is a great one to computerise, 
and one which you should not find difficult to 
do. The relative ease of writing a Roulette 
program, compared to one which, say, plays 
Chess, comes from the fact that a Roulette 
program does not require- any strategic 
'jntelLligence', but simply has to accept bets 
and spin the wheel, then act on the result. 
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CHAPTER SIX — 
CREATING BOARD GAMES 


This chapter of the book will lead you through 
the development of an almost-complete game of 
Checkers for Draughts, as it is often called). 
The game is 'partially-complete' because it 
lacks the facility of multiple jumps. Apart 
from this, it will provide you with a lot of 
entertainment. 


The main reason for including it in the book is 
so that a method for numbering boards for 
computer versions of board games can_ be 
exp Lained. This system produces a board which 
the computer can manipulate relatively easily. 
A similar numbering system can be used ffor 
almost any board game, from Chess to Othello. 


You should follow the text carefully, entering 
each version of the program as it is described. 
Then you'tl have a pretty good understanding of 
how the system works. This information can then 
be used to create your own computer’ board 
games. 


The normal way to number a checkers board is to 
count off the white squares from one to 32, as 
in this diagram: 





Actually, the black Squares are counted, but 
white ones are used here because it is easier 
to see the numbers on white than on the black. 
When you’ look at the numbers on this_ board, 
you'Ll see the method creates a problem when we 
try to define a move in terms of the difference 
between two diagonally adjacent squares. In one 
direction, the difference between the squares 
can be three or _ four, and in the other 
direction, the difference can be five or four. 
There are also no 'spare' numbers to indicate 
where the edge of the board begins. 


In an article in Scientific American in the 
1960s, A L Samuels described a board-numbering 
system he had devised in which the difference 
between diagonally adjacent squares was always 
four and five (or minus four and minus five). 
The system also allowed for numbers to be given 
to squares which were 'off the board’. (You can 
read about Samuels' system in Systems Analysis 
and Programming, in READINGS FROM SCIENTIFIC 
AMERICAN, Strachey, C., WH Freeman and Co., 
San Francisco, 1971.) 


Although Samuels' system worked, it was a 
Little Limiting, so I devised a system of my 
own which was more convenient for the computer 
to use. In my version of the system, the 
difference between squares is alwayS six or 
seven for minus six and minus’ seven). The 
System sets up an array of 82 elements, and 
allots certain elements of this’ array to 
Squares on the board. Atl the others are 
understood by the computer to be off the board. 
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In this program, the computer allots a value of 
9 to any square off the board, zero to an empty 
square, 1 to a computer's ordinary piece and 2 





to its King, and —1 for the player's piece with 
-2 for the player's King. This may sound a 
Little complicated, but as you read on, it 
should become clear. 


Look at the numbered board above. You can see 
that if you move from the top right hand corner 
(69) to the square diagonally below it (63) the 
difference between the two squares is —6. Now, 
choose any other square on the board from which 
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you can move down and to the left, and you'll 
see there is a difference of -6 between the 
square you started on, and the square on which 
you have finished. 


This predictability makes it easy for the 
computer to manipulate pieces on the _ board. 
You'll see if you move in the other’ direction 
(that is downwards to the right) that’ the 
difference between the squares is —/7. 


With the first version of the program, we'll 
actually be playing on this board, so _ you'll 
have to get a number of buttons or small coins 
to use as pieces. Alternatively, you can 
transfer the numbers to a full-size board. 


The program is in two parts. The first ‘sets up 
the board! (the subroutine starting at 9000) 
and the second (10 to 370) actually plays’ the 
game. Your pieces start at the bottom of the 
board on the Lower numbers, and the computer 
starts at the top. You place the pieces on the 
board and then type in RUN. As you'Ll see, it 
plays remarkably quickly. 


The computer's moves are shown as two numbers. 
The first is the square it is moving from, and 
the second is the square into which it will 
move, Move the computer's piece on the board 
as instructed and then decide on your move. 
Make sure you actually move your piece on’ the 
board before you make the move, so you don't 
forget what the move was. Remember that there 
is no provision within the program for multiple 
jumps by either you or the computer. As well, 
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the game in this version cannot make or use 
Kings. 


Here is the first part of the program, which 
sets up the board. It creates an array — DIM 
A(82) - then fills the array with numbers 
representing pieces on the board (1 and -1), 
empty squares (0) and squares off the board 


(9). 9000 DIM A(B2I 
9030 X{L)=-62X (2)=-7 
9050 FOR I=1 10 82 
9080 ACL)=9:NEXT 
9065 FOR 2=56 TO 72 
9046 IF 2=47 THEN 2=69 
9067 IF 2=60 THEN 1=63 
9070 ALZ)=1:NEXT 
9075 FOR 1=43 TO 53 
9076 IF 1-47 THEN 7=50 
9080 AZ)=OsNEXT 
9090 FOR 2=24 TO 40 
9095 IF 1=34 THEN 2=37 
9096 IF 1=28 THEN 7=30 
9100 AIZ)=-L:NEXT 
9110 AS="NY MOVE® 
9120 BS="YOURS® 
9130 RETURN 


Check to see if it is working properly before 
you proceed. RUN the program, and ignore the 
error message you get. Get the computer to 
print out the following, to make sure it’ has 
asssigned values correctly. The correct answer 
to each is given: 


PRINT A(23) 9 
PRINT A(54) 9 
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PRINT 
PRINT 
PRINT 
PRINT 


A(64) 
A(38) 
A(51) 
A(73) 


Now enter the following: 


1 REM CHECKERS 
J ELS:60SUB 9000 


10 G=0 
20 1=24 
25 IF A(Z)=9 OR ACZ)<1 THEN 100 
50 \=1 
60 IF ACZ+X(X))<0 AND ACZ+24X(X))=0 THEN B=X(X) 
70 IF Q¢>0 AND 7+240 THEN 120 

B0 Q=0 
90 IF X¢2 THEN X=X+1:60T0 60 
100 IF 1¢72 THEN 2=2+1:6070 25 
110 IF Q=0 THEN 140 

120 AIZ+B)=0 
130 A(7+240)=A(T) 
140 AIZ)=0 
150 PRINT AS: Z37+280 
155 GOTO 320 
160 Y=0 

170 Z=INT(RND(O) #49) +24 
180 Y=V+! 
190 IF ACZ)C31 AND A(Z)¢92 THEN 170 
200 X=! 
210 IF A(Z#X(X))=0 THEN Q=X(X) 

220 IF A(Z)=2 AND ACZ-K(X))=0 THEN O=-K(0) 
230 IF 630 THEN 290 


Z 
2 
) 
4 
z 
4 
& 


AQ TF X42 THEN X=X+1:60TO 216 
60 IF ¥Ci00 THEN 170 

70 PRINT "YOU WIN" 

80 END 
90 ACZ+R) =A (7) 
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700 ACZ)=0 

310 PRINT @ 0,A$sZ3Z+0 

320 PRINT:PRINT BS; 

330 INPUT A,B 

340 CLS:A(B)=A(A) 

350 A(A)=0 

360 IF ABS(A-B)37 THEN A({(A+B)/2))=0 
370 GOTO 10 


Play a complete game with the computer, using 
the board provided, then return to the’ book, 
and we'll look at ways of improving the game. 
You move by entering the number of the square 
you're moving from, then a comma (,), then the 
square you're moving to, before pressing 
RETURN. 


The next version of the program adds a_ board 
display. You still need to refer to the diagram 
to get the numbers to enter, and there is no 
provision for Kings. Delete Line 320 of your 
program, and delete the CLS from tine 340. 
Change 310 and 150 to GOSUB 5000, and add Line 
15. Change Line 155 to GOTO 330. 


1 REN CHECKERS 
2 REM VERSION I] 
o CLS:GOSUB 9000 


10 Q=0 

15 GOSUB 5006 

eQ Z=24 

ev af ACZ)=9 OR ACZ)<L THEN 100 
uO X=4 


60 TF ACZ+X(K))<0 AND ACZ+Z249X(X))=0 THEN Q=X(X) 
70 IF Q¢>0 AND Z+#2%@ THEN 120 

80 8=0 | 

70 IF X42 THEN X=X+1:G0T0 60 
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100 IF 2¢72 THEN Z=Z+1:G0T0 25 
110 IF B=0 THEN 140 

120 A(1+0)=0 

130 A(7+280)=A(Z) 

140 A(Z)=0 

150 GOSUR 5000 

155 GOTO 330 

160 Y=0 

170 Z=INTIRND (0) £49) +24 

180 Y=V4l 

190 IF ACZ)C}1 AND A(Z)<>2 THEN 170 
200 X=! 

210 IF ACZ+X(X))=0 THEN Q=4(X) 
220 IF A(Z)=2 AND ACZ-X(X))=0 THEN G=-X(X) 
230 IF Q{)0 THEN 290 

240 IF X<2 THEN X=X+1:60TO 210 
260 IF Y¥C100 THEN 170 

270 PRINT "YOU WIN" 

280 END 

290 AXZ+Q)=A(Z) 

300 A(Z)=0 

310 GOSUB 5000 

330 INPUT A,B 

340 A(B)=ACAI 

350 A(A)=0 

340 IF ABS(A-B)}7 THEN A({ (A+B) /2))=0 
370 BOTO 10 

5000 FOR M=24 TO 72 

5010 IF A(M)=1 THEN A(M)=66 
5020 If A(M)=-1 THEN A(N)=87 
5030 IF A(M)=0 THEN A(M)=32 


5050 NEXT N 

5055 PRINT 2 0,” ' 
5040 IF Q¢)0 THEN PRINT @ 0,A$;2;2+0 
5070 PRINT 9 320," 


5080 PRINT 2 64,3 
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5090 FOR K=0 TO 3 

si00 FOR J=0 10 3 

S110 PRINT CHR$(128) sCHRE(A(72-J-138K))5 
ui2Q NEXT J 

3130 PRINT 

3140 FOR J=0 TO 3 

w130 PRINT CHR$(A(66-J-159K)) sCHRS (128); 
ui60 NEXT J 

o170 PRINT 

o180 NEXT K 

y200 FOR M=24 TO 72 

u2iQ IF A(M)=66 THEN A(M)=! 

yelQ TF ACM)=87 THEN ACM) =-i 

G20 IF AtM)=32 THEN AiM)=0 
v2u0 NEXT § 

W260 RETURN 

7000 DIM ALB?) 

9030 X(1)=-6:4(2)5-7 
9050 FOR Z=1 TO 82 
7060 A(Z)=9:NEXT 

9063 FOR Z7=36 10 72 
9066 IF Z=47 THEN 72=69 
9047 IF 2=60 THEN Z=63 
9070 A(Z)=1:NEXT 

9073 FOR 7=43 10 33 
9076 IF Z7=47 THEN Z=50 
9080 A(Z)=0:NEXT 

9090 FOR z=24 TO 40 
9095 IF 2=34 THEN 2=37 
9096 IF 2=28 THEN Z=30 
9100 A(Z)=-L:NEXT 

7110 A$="HY MOVE" 

9120 BS="YOURS" 

9130 RETURN 
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The next version of the program adds Kings (the 
computer's King is a K, yours is the hash, #, 
symbol), and with the addition of a_ single 
Line, 215, adds an element of foresight (the 
computer will be reluctant to move into danger 
on a non-capture move) which markedly improves 
the computer's play. 


1 REM CHECKERS 
2 REM VERSION III 
5 REM KINGS ADDED 
4 REM PLUS SOME STRATEGY 
3 CLS:60SUB 9000 
10 Q=0 
15 60SUB 5000 
20 i=24 
ed IF A(Z)=9 OR A(Z)<¢1 THEN 100 
30 k={ 
so IF 2¢71 THEN IF A(Z-X(X))¢O AND ACZ-28%(X))=0 THEN Q=-X (x) 
50 IF ACZ+X(X))<¢0 AND A(Z+#24N(X))=0 THEN Q=X{%) 
70 IF Q¢>0 AND 2+288 THEN 120 
80 Q=0 
90 IF X¢2 THEN X=X+i;60T0 60 
100 IF 2¢72 THEN Z=Z+1:60T0 25 
110 IF Q=0 THEN 140 
120 AizZ+8)=0 
130 A(Z+2%0)=A(7Z) 
140 At7Z)=0 
130 G0SUB 5000 
sa GOTO 330 
160 Y=0 
170 Z=INT(RND (0) $49) +24 
18) Y=¥+! 
190 IF ACZ)< 24 AND A(Z)432 THEN 170 
200 X=1 
210 IF ACZ+X(X})=0 THEN Q=XiX) 
215 IF A(Z+28X(X))<0 AND Q¢>0 AND RND(O)>.7 THEN Q=0 
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220 IF A(Z)=2 AND ACZ-¥(X))=0 THEN G=-X(X) 
230 IF 650 THEN 290 

240 IF X¢2 THEN X=X#1:GOTO 210 

260 IF Y<100 THEN 170 

270 PRINT "YOU WIN" 

280 END 

290 A(Z+0)=A(Z) 

300 AIZ)=0 

310 BOSUB 5000 

330 INPUT A,B 

340 A(B)=AIA) 

350 ACA)=0 

360 IF ABS(A-B)>7 THEN A({(A+B) /2))=0 
370 GOTO 10 

5000 FOR M=24 TO 72 

5005 IF A(M)=1 AND 423 AND MC28 THEN A(N)=2 
5006 IF A(M)=-1 AND H)48 THEN A(M)=-2 
5010 IF ACM)=1 THEN A(M)=46 

5015 IF A(M)=2 THEN A(M)=75 

5020 IF A(M)=-1 THEN A(M)=87 

5025 IF A(M)=-2 THEN A(N)=35 

5030 IF A(M)=0 THEN A(M)=32 

5050 NEXT N 

5055 PRINT 2 0," , 

5040 IF O<>0 THEN PRINT 2 0,A$3Z;7+0 
5070 PRINT 2 320," , 

5080 PRINT @ 44,: 

5090 FOR K=0 TO 3 

5100 FOR J=0 TO 3 

5110 PRINT CHR$(128) sCHRS(A(72~J-134K) ) 
5120 NEXT d 

5130 PRINT 

5140 FOR J=0 10 3 

5150 PRINT CHR$(A(G4-J-134K)) sCHRS$ (129): 
5140 NEYT J 

5170 PRINT 

5180 NEXT Kk 
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00 FOR M=24 TQ 72 
10 IF ACM)=66 THEN ACM)=1 
13 TF A(M)=75 THEN ACH)=2 
20 IF A(M)=87 THEN A(M)=-1 
Zo IF A(H)=35 THEN A(M)=-2 
30 IF AdH)=32 THEN A(M)=0 
oG NEXT 
60 RETURN 

00 DIM A(82) 

30 XL )=-8sX(2) 5-7 
9090 FOR Z=1 TO 82 
9060 ACZ)=9: NEXT 
9065 FOR Z=56 10 72 
9066 IF 7=47 THEN 7=69 
9067 IF 2=60 THEN 7=43 
9070 A(Z)=1:NEXT 
9073 FOR 2=43 TO 33 
9076 IF 2=47 THEN Z=30 
9080 A(Z)=0:NEXT 
7090 FOR 2=24 70 40 
9095 IF 2=34 THEN 2=37 
9096 IF 2=28 THEN 2=30 
9100 A(Z)=-1: NEXT 
9110 AS="MY MOVE" 
9120 BS="YOURS* 
9150 RETURN 


> = 


Our final version of the program adds aé_e few 
features, such as a 'score' which counts’ how 
many pieces each of you have captured. And _ in 
this version, you can forget the numbered 
board. The board now appears on the screen with 
the Letters ABCDEFGH across the top, and _ the 
numbers ‘1 to 8 down the side. You make a move 
Simply by entering the co-ordinates of the 
relevant squares (such as E6,C4) instead of the 
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numbers and the computer interprets them to 
make your desired move. 


Before I give you the listing of the final 
version, here's a printout of part of a game 
played against it. When you see it on_ the 
screen, the dots will be replaced by black 
squares, and the 'Less than' symbols down’ the 
right hand edge will be replaced by a black and 
white Line. 


ABCDEFGH ABCDEFGH 

.B.B.B.BS 1 H.R. B.S 

Wale ese 2 B.ELBLBL 2 
ieee ae 3 > he. 2h S 
» oh oe 4 BR. oR. ot 4 
— . 25 won WE 
WeWeWeW. = & Welelbs. ct & 
WwW WoW 7 WWoW.We We OF 
WiW.W.W.c 8 WoWeWW. St 8 


Y 4a AS PORT eae 


MBC DEF GH 
a hw wet y EAS 
ae Peet heck, 


bho 


" tt \x “ r] “te 
Bs a bhe Gack 

ro | Sona 
" n ” aad 


Wa W.WAW. = 4 
»WAW. We 
W.W.LW.WL St 8 
eo eooE % 


MY SCORE IS 1 
YOUR SCORE IS 1 
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ARCDEFGH 
~~. H.R. Bet 
be Ba &. oh 
Mes ace ope 
Ba «bebe ® 


CA id ho ow 


WiW.W.W. 
»W.W.W. We 
WeWeaWe 2% 
° 646, HS 


oo “i fo 


MY SCORE IS 1 
YOUR SCORE I5 I 


ABCDEF GH 
BeBe Ee 
bw « «ft 
& coke Eee 

ie: a. ahh 
o «whe .WE 
WWW. 28 
~WLW. WWE 
Welw We. 48 
Y C6,E4 


poo 


“TO Cf tb td B23 


ai 


MY SCORE I5 i 
ARCDEFGH YOUR SCORE IS 1 
ibe te babs 
Boks «. at 
i. athe ca OS 
Re a: we Ee 
ao eee oa WS, 
We «We. 2 
~WWLW. We 
WWW. 28 
° Ed. 4 


NO Boi bhp oe 
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ABCDEF GH 


.HBWB. Be 1 

BOB, 2 a % 2 

me it da? tg SR aes MY SCORE IS 3 
BR. . «Hee 4 YOUR SCORE IS 3 
oR ae a WE 

WG a se a 

~WeWLW.We 7 

WeWIW. 2 

? AS, C4 


And here's’ the final version of our Checkers 
game: 

1 REM CHECKERS 

2 REM VERSION IV 

3 REM PROPER MOVE INPUT 

4 REM PLUS ON-SCREEN SCORING 

5 CLSsG0SUB 9000 

10 Q=0 

{5 GOSUB 3000 

20 7=24 

25 IF ACZ)=9 OR ACZ)<1 THEN 100 

30 X=] 

55 IF 2¢71 THEN IF ACZ-X(X))<0 AND A(Z~24X(X))=0 THEN Q=-X(X) 

60 IF ACZ+X(X))<0 AND A(Z#28X(X)})=0 THEN @=X (x) 

70 IF Q¢30 AND 7+23Q0 THEN 120 

80 G=0 

90 IF X¢2 THEN X=X+1:G0TO 60 

100 IF 2¢72 THEN Z=Z+1:G0T0 25 

110 IF Q=0 THEN 140 

120 A(Z+B)=0 

130 A(2+24Q)=A(Z) 

135 CS=CS+1 

136 PRINT 9 392,"RY SCORE I5"CS 

140 AtZ)=0 

150 605UB 5000 
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135 60TO 330 

160 Y=0 

170 Z=INTIRND (0) $49) +24 

180 Y=¥+{ 

170 TF ACZ)¢71 AND ACZ)<>2 THEN 170 

200 X=1 

210 IF ACZ+X(X))=0 THEN Q=%(X) 

213 IF ACZ+29X(X))<0 AND 840 AND RND(O)>.7 THEN G=0 
220 IF ACZ)=2 AND A(Z-X(X))=0 THEN Q=-XiX) 
250 IF @¢>0 THEN 290 

240 IF X¢2 THEN X=X41:G070 210 

260 IF ¥<100 THEN 170 

270 PRINT "YOU WIN" 

280 END 

290 AtZ+O)=A(7Z) 

300 A{Z)=0 

510 GOSUB 5000 

330 GOSUB 1000 

340 A(B)=ACA) 

300 ACA)=0 

360 IF ABS(A-B)>7 THEN AC ( (A+B) /2))=0sHS=HS+1 
369 IF HS¢>0 THEN PRINT @ 422,"YOUR SCORE IS"5HS 
370 6OT0 10 

1000 INPUT V$,N$ 

1010 FOR U=1 TO 32 

1020 IF ¥$(U)=V$ THEN A=R(U) 

1030 IF YS(U)=N$ THEN B=R(U) 

1040 NEXT 

1050 RETURN 

9000 FOR M=24 TO 72 

S005 IF A(M)=1 AND M>23 AND MX28 THEN A(M)=2 
0006 IF ACM)=-1 AND M>68 THEN A(M)=-2 

vO10 TF A(M)=1 THEN A(M)=664 

JO15 IF A(M)=2 THEN A(M)=75 

0020 IF A(M)=-1 THEN A(M)=87 

0025 IF A(M)=-2 THEN A(M)=35 
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5030 IF A(M)=0 THEN A(M)=32 
5050 NEXT M 

5070 PRINT @ 320," ' 

5080 PRINT @ 64,: 

5090 FOR K=0 TO 3 

5100 FOR J=0 TO 3 

5110 PRINT CHR$(128) :CHR$(A(72-J-138K))s 

5120 NEXT J 

5130 PRINT 

5140 FOR J=0 TO 3 

5150 PRINT CHR$(A(6-J-138K) } sCHRS (128) : 

5160 NEXT J 

5170 PRINT 

5180 NEXT K 

5200 FOR H=24 TO 72 

S210 IF A(M)=66 THEN ACM)=1 
5215 IF A(M)=75 THEN A(M)=2 

5220 IF A(M)=87 THEN A(M)=-1 

5225 IF A(M)=35 THEN A(M)=-2 
5230 IF A(M)=32 THEN A(M)=0 
250 NEXT N 

5260 RETURN 

9000 DIM A(82) 

9030 X(1)=-624(2)=-7 

9050 FOR Z=1 10 82 

9040 ACZ)=9:NEXT 

9065 FOR Z=56 TO 72 

904 IF 7=67 THEN 2269 

9047 IF 7=60 THEN 1=63 

9070 ACZ)=1:NEXT 

9075 FOR Z=43 T0 53 

9076 IF 2=47 THEN 7=50 

9080 A(Z)=0:NEXT 

9090 FOR 7=24 TO 40 

9095 IF 2=34 THEN 2=37 

9096 IF 2=28 THEN 1=30 
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9100 A(Z)=-L:NEXT 

9110 AS="MY MOVE" 

9120 B$="YOURS" 

9130 FOR J=72 TO 296 STEP 32 

9140 PRINT 2 J, CHR$(133)sINT(J/32)-1 

9150 NEXT J 

9140 PRINT @ 32, “ABCDEFGH" 

9170 PRINT 2 O4,">PLEASE":PRINT®)>STAND®: PRINT >> BY" 
9180 DIM R432), ¥$(32) 

9190 FOR T=1 10 32 

9200 READ X$:READ @ 

9230 RIT) =O: Y$(T)=X$ 

9740 NEXT 

9250 HS=0:CS=0 

9500 RETURN 

9510 DATA "B1",72, "D1", 71, "FL%, 70, "HI", 69 
9520 DATA "A2", 66, "C2", 65, °E2", 64, "62", 63 
9530 DATA "B3",59, "D3", 59, "F3", 57, "H3", 56 
9540 DATA "AS", 53,°C4", 52, "E4", 51, "G4", 50 
9550 DATA "B5",46,"D5",45,"F5",44, "HS", 43 
9540 DATA "Ab", 40, "C4", 39, "ES", 38, "Gh", 37 
9570 DATA "B7",33, "D7", 32, "F7", 31, "H7", 30 
9580 DATA "AS", 27, "CB", 26, "EB", 25, “6B, 24 
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CHAPTER SEVEN — 
A GAMUT OF GAMES 


The 'Lessons' are now behind you. In this next 
section of the book we have a number of games 
which I am sure you'll enjoy playing. 


Once you have 

system, spend a 
personal touch to 
you Like. As 
listings should 
ideas to include 


them up 


bit of 
them. 
well, 
give a 
in your 


and running on your 
time adding your own 
Modify them in any way 
studying the program 
number of additional 
own programs. 


The games in this Section are: 


LAUNCH PAD 

LEAPFROG 
NUMBER CAVALCADE 

ROMTHELLO 


LIFE 
NIMGRAB 


LAS VEGAS HIGH 
SWITCHEROO 


Good gameplaying. 


MANCALA 
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LAUNCH PAD 


Here's a simple program which fills your TV 
with ‘rocket ships’ blasting off up the screen. 
You may well be able to work this’ very 
effective display into a game. 


Here's an indication of what it Looks Like = on 
screen: 


a 
as | 
fFEGS 
A¥N A 
LT EN 
LN 
A 
[v1 
ie ee 
fk 
A 
LF EN 
SK 
Fy 
cen 
a oN 
Fi 
cael 
Pf NN 
SRN 
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And here's the brief Listing: 


10 REM LAUNCH PAD 

15 DIM A$(3) 

17 CLS 

20 A$(1)="— A® 

30 AS(2)=" TAT" 

A) AS(S)=" //s\\" 

uO AS(4)=" /H\" 

90 G=INT(RND(0) #25) +1 
110 FOR R=1 TO 4 

130 PRINT TAB(Q); A(R) 
135 NEXT R 

140 FOR P=1 TQ @/3 
150 PRINT 

160 NEXT P 

170 6070 20 
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LEAPFROG 


Here's a game which will test your wits. The 
game begins with a display Like this: 


THAT WAS MOVE O 


$ x Ke e 


$ $ $ 
123456789 


WHICH PIECE TO MOVE? 


The aim of the game is to end up with the 
asterisks on the Left and the dollar signs’ on 
the right. You can only move into the empty 
Space, either by sliding sideways into it, or 
by jumping over one piece (hence the name of 
the game) into the space. 


The aim of the game is to get the pieces 
Swapped in the fewest possible moves. You'LL 
find it a difficult, frustrating challenge. 


10 REM LEAPFROG 

20 X=-12Me9 

30 CLS 

90 FOR G=1 TOK 

100 IF Q¢5 THEN A(Q)=ASC("S") 
110 IF Q>5 THEN A(Q)=ASC("S") 
120 NEXT @ 

130 FOR T=1 TO 400:NEXT T 

140 C=0 

150 X=X+ 

170 PRINT @ 32,"THAT WAS MOVE "3X 
180 PRINT:PRINT 

200 GOSUR 1000 

210 PRINTSPRINT 
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220 PRINT "YOU HAVE"sCs "CORRECT" 

230 IF C=8 THEN 340 

240 GOSUB 32 

270 GOTO 130 

320 PRINT @ 390,"WHICH PIECE TO MOVE?" 
324 IF INKEY$(>"" THEN 324 

325 AS=INKEY$ 

326 IF AS¢"{" OR AS>"9" THEN 325 

327 T=VAL(A$) 

328 FRINT 9 390,° ' 
330 K=A(T) 

340 A(T) =0:A(H)=K 

350 RETURN 

340 PRINT:PRINT TAB(8)s"WELL DONE!" 

370 PRINT:PRINT TAB(4)3"YOU SOLVED IT IN"," JUST" s Xs "MOVES? 
1000 PRINT: PRINT 

1010 FOR 2=1 T0 9 

1020 IF ACZ)¢}0 THEN PRINT CHRS(A(Z))3" "3 
1030 IF A(Z)=0 THEN PRINT "  "ssH=7 

1040 IF 265 AND ACZ)=ASC("E") THEN C=C+1 
1050 IF 235 AND A{Zi=ASC("$") THEN C=C+1 
1070 NEXT 2 

1080 PRINT:PRINT "123456789" 
1090 RETURN 


THAT WAS MOVE 22 
fk kB BRK 


1} 2PB4S 6 F oY 


YOU HAVE 4 CORRECT 
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NUMBER CAVALCADE 


In this simple game, you think of a number 
between one and 63. The computer then proceeds 
to show you a series of groups of numbers. If 
the number you're thinking of is within a 
particular group, you press the "Y" (for ‘yes') 
key. If your number is not on the Screen, you 
press the "N" key. 


At the end of the game, the computer will tell 
you the number you had thought of. 


be 2 Ld be oe ae 
19 2) 25.25 er 27 Ss 
mo Go 37 39 41 435 45 
7 49 Sil S43 35 S/7 oF 
61°63 
a 
soo 6 F 10 11 14 15 
18 19 22 235 26 27 30 
od 34 35 38 29 42 423 
46 47 SO Sl o4 35 38 
29 62 6S 
N 
45 6 7 12 13 14 15 
oO 21. 2S 2S 28-29 20 
Si 36 37 238 39 44 45 
44 47 SO Sl S34 SS 38 
61 62 65 
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—~ 


ms 
4 
wad 
4 
bl 


i ae | 
tema? oles 


ah 4 
4h 
we 


60) 


1a 
er 


oy ie 


40) 
47 


ony 
Ld ties 


te 


4c) 
47 
4 


& 1 


ii is 


an ale 
ao 


41 42 


aT on) 


fin 


a Hh 
4 
43 
Fa 


FR ade) 
. 
ie Bee 


N 


10 REM NUMBER CAVALCADE 


wl 


mr Eas, 
tert teed 


—y 


whan 

ray t) 
¢ 
if 

I & 


= 
bin 


“we 
weet 


An 


"56 
50) 


| iy bath, d 
Pine Br 


14 


1S 


29 BO 
44 45 


ae 9 8 


14 
ae r 
ot) 
gn 
Sood erect 


ét) 


ar 
“f ah 
als | 


wes 


1? 
24 


| Mog 
sul WF 


41. 


aes 
' 
east &4 


Lh 
eed 


mr ea 
wed atl 


Ket g"* 
ra he 


YOUR NUPIRER 


15 X=.5:N=Q:605UB 1020 
20 PRINT "13.5379 01 13 15 17" 
3Q PRINT "19 21 23 25 27 29 31" 

40 PRINT "33 35 37 39 41 43 45° 

3Q PRINT "47 49 31 53 95 37 99" 

60 PRINT “61 43" 
70 GOSUB 1000 

BO PRINT "236 7 10 11 14 15" 

90 PRINT "18 19 22 23 26 27 30° 

100 PRINT “31 34 35 38 39 42 43" 
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bo: 19 


oe 2h 
403 45 
for Eis Eo ft 
red sand sed EZ} 


Oa &o 


WAS 2? 


21 
oC} 
wd 


wed 


ie 
wihee eBlae 
ory biel 
[ora 


ead ston 
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110 PRINT 
120 PRINT 
130 60SUB 
140 PRINT 
150 PRINT 
160 PRINT 
170 PRINT 
180 PRINT 
190 GOSUE 
200 PRINT 
210 PRIAT 
220 PRINT 
230 PRINT 
240 PRINT 
290 6OSUB 
250 PRINT 
270 PRINT 
26) PRINT 
290 PRINT 
300 PRINT 
400 G0SUB 
410 PRINT 
420 FRINT 
430 PRINT 
440 PRINT 
450 PRINT 
460 60SUB 
470 PRINT 


"46 47 30 51 34 55 38 


"59 62 63° 

1000 

"4967 12 13 14 15" 
"20 21 22 23 28 29 30° 
"31 36 37 38 39 44 45" 
"h6 47 50 51 54 55 58° 
"61-62-65" 

1000 

"B9 10 11 12 13 14 15" 
"24 25 26 27 28 29 30° 
"SL 40 41 42 43 44 45" 
"86 47 56 57 58 59 60" 
"61 62 63° 

1000 

"16 17 18 19 20 21 22" 
"23 24 25 26 27 28 29° 
"30 31 48 49 50 51 52" 
"535 54 35 56 37 58 39" 
"60 61 42 63" 

1600 

"32 33 34 35 36 37 38” 
"39 40 41 42 43 44 45" 
"46 47 48 49 S50 Si 52° 
"35 54 50 56 37 58 99" 
"60 61 62 63" 

1000 

"YOUR NUMBER WAS";N 


480 GOTO 480 


1000 X=X+X 


1005 GOSUB 1060 
1010 SOUND (24%/3+2),1 
1020 FOR T= 1 TO S00:NEXT T 


i630 CLS 


1040 PRINT: PRINT: PRINT 
1050 RETURN 
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1060 IF INKEY$<>"" THEN 1066 

1063 AS=INKEY$ 

1070 TF AS<2"N® AND A$<>"Y" THEN 1065 
1080 IF AS="¥" THEN N=N+X 

1090 RETURN 
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ROMTHELLO 


This major program is based on the board game 
known either as REVERSI or OTHELLO. Invented in 
the Late eighteen hundreds, it is played on an 
ordinary eight by eight board. When played on a 
board, you use pieces which have different 
colors on each side. The game begins with four 
pieces placed on the central squares. 


From this point on, you move by placing one of 
your pieces next to a computer piece or pieces, 
with another of your pieces further on. When 
that happens, all the computer pieces ‘reverse! 
to become your pieces. 


Here's how it works. Suppose a line of pieces 
Looked Like this: 


OXXXX 


If you decided to put your piece (an OQ) at the 
end of the Line Like this: 


OXXXXO 


The computer pieces (the X's) would reverse, so 
the Line tooked Like this after your move: 


000000 


The game continues until every square on_ the 
board is filled, or neither player can move. As 
you can imagine from the sample move’ shown 
above, fortunes change swiftly in this game, as 
rows branching off your position, such as_ on 


84 


the diagonals, can be changed with a_ single 
move. 


If you cannot move at any time, you signal this 
to the computer by entering a zero. 


This sample run shows the early stages of one 
game played against the computer: 


123 4 5 & 7 @ 
1 a n a nm n n " i 
ona “ny 
ates a “ a " “a « a " Ree 
teal r ' = ” * « nat 
4 Cc) " au x r) aw " " 4} 
ey a " " tl 4 n a" ea 
& " n a C] ) " a” F] és 
; ; a nH a n n i] in ® vf 
{} e a a rs = a " int 

1 2 32 48 6 7 8 


SOMPUTER 2 HUMAN 2 


— 
ry 


1 ew oo 4 SB & F 8 
iH a“ n u a ft H " n i 
= zs 
aleve tc] fn uw R C] a ry ” Lee 
oe og 
vat a “" n a a ® 8 woe 
<h. ® rl] x m3 8 " « 4 
af e- des ae Ge ee . cy 
& i) " 4 x CT “ n & 
a n " r = u n g tt / 
&} " “ a " " & res} 

1, 2 oe Be ee OS 


COMPUTER 4 HUMAN 1 
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_ 


* 
- 


MON & Of Bb bi bh 


CORFUTER 


CWO Cf bby hie 


my 
ai 


Bee 


COMPUTER 


SO NWN & Fb fi ble 


rn, 
a 
shen 


4 


x of > * 


rs 
a) 


w 8 
“ 
- « 
non 
O 
Ko 
» 6 
. 


Co “MD Oo CF mB ty bp oe 


5 KF 


Os] Ot ii 


5 Met 


CQ“; OF OF te bl poe 


a 
] a a w n ) n a ® 
ot my 
Beer a ™ a . ry a - ] " 
a 


x 
—, 
— 
~~, 
ee 
1: 
"ae? 
a 
2 
a 
Zz 
$s ie] F 


I= bad ? = 
toed v] 7 1) i} x “ * Ps aa 


ry 
ra 
Z 
= 
x 
>» 
a: 
— 
ates, 
— 
™ 
8 
z 
. rar . 
“e 


88: 
18 


COMPUTER HUMAN  & 


1 a ee ee ee ee ee 1 
Se i a Oe, a 
: e GO Oe ae we 6 
al a ec ees eo, ae 


~4 & 
x 
ot 
37 
> 
no 
a 
1] 
Cr 


rm ~ 
= 
z 
Py 
z 
Li ox > 


Le th Se 
1 Be ne ie iy. 1 
a ‘7 
athe n # a ® Rn n n n at. 
mf a a ee a a a 
<} o. OF SO Ee EE ae 4 
ra ey: AD ED, KS, wage, ae a 
& we RR) OE GD a OO ay 5 
7 a ae ae a a 7 
c kc se. Se A er OR a 
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Pa 
i, 

te 
CF 
cy 
or 
88: 


La won eb moe ee 
A op OOO OE os we ee 
She Woe a ee, 
& . X¥ XX XXX XS 
; a re a a ne 
SS «= bo Mas ce 8 
i2rsat4547 28 
COMPUTER 14 HUMAN & 


And here's the listing of ROMTHELLOQ: 


10 REN ROMTHELLO 

20 BOTO 740 

OG PRINT 9 384, "HY HOVE" 

40 S=7:T=ksH=0 

50 FOR A=2 TO 9:FOR B=2 TO 9 
60 IF ACA, 8)¢>46 THEN 210 


70 Q=0 
80 FOR C=-1 TO 1:FOR D=-1 TO ! 
90 K=0:F=A: 6=B 


100 IF ACF+C,G+D)<>5 THEN 130 

110 K=K+l:F=F+C; 6=6+D 

120 BOTH 100 

150 IF A(FHC,G+D)<>7 THEN 150 

140 Q=0+K 

150 NEXT D:NEXT C 

160 IF A=2 OR A=9 OR B=2 OR B=9 THEN Q=G$2 

170 IF A=3 OR A=B OR B=3 GR B=8 THEN Q=@/2 

180 IF (A=2 OR A=9) AND (B=3 GR B=8) THEN @=0/2:60T0 190 
185 IF (A=3 OR A=8) AND (B=2 OR B=9) THEN Q=@/2 
190 TF QcH OR CRND{Q)¢.3 AND G=H) THEN 210 

200 H=@:4=A:N=B 
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210 NEAT BsNEXT A 

220 IF H=0 AND R=0 THEN 690 

230 IF H=0 THEN 250 

240 GOSUB 586 

200 GOSUB 370 

250 PRINT @ 384," . 

260 PRINT @ 354, "ENTER YOUR MOVE" 
270 PRINT: INPUT R 

275 PRINT @ 354, ° ' 
280 S=X:T=Z 

290 IF R=0 THEN 350 

300 IF R¢i1 GR R288 THEN 260 

310 R=R+ii 

320 M=INT(R/10) 

330 N=R-1008 

340 GOSUB 380 

230 GOSUB 370 

360 60T0 30 

370 REN PRINT BOARD 

580 C=0:H=0 

5970 SOUND RND(O) #30, 1 

395 SOUND RND(0) $30, 1 

40) PRINT 2 30,° 1234567 8" 
450 FOR B=2 TO 9:PRINT B-13" °; 
440 FOR D=2 109 

470 PRINT CHRSiA(B, D3" *5 

480 IF A(B,D)=% THEN C=Cti 

490 IF A(B,D)=Z THEN H=H+! 

JOO NEXT D 

wiQ@ PRINT B-i 

uzQ NEXT B 

O20 PRINT " 123435 6 7 8° 
340 PRINT 

o0 PRINT @ 490,"COMPUTER ";C;" HUMAN "3H 
u70 RETURN 

vg0 FOR C=-1 TO isFOR D=-i TO 
990 F=4:6=N 
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B00 IF A(F#C,64D)<)S THEN 630 

S10 F=F4C:6=6+0 

620 GOTO 400 

430 IF A(F+C,6+D) <> T THEN 470 

640 AIF,6)=T 

650 IF M=F AND N=6 THEN 70 

660 FsF-C:G=6-D:6070 640 

670 NEXT D:NEXT C 

b80 RETURN 

490 GOSUB 370 

700 IF COH THEN PRINT "I'M THE CHANP!* 
710 IF H¥C THEN PRINT "YOU'RE THE CHAMP” 
720 IF H=C THEN PRINT "IT’S A DRAW" 
730 END 

740 CLS 

750 X=88:7=48 

740 DIN ACO, 10) 

770 FOR B=1 TO 10:FOR C=1 10 10 

780 IF BO} AND CCPL AND B31 AND C(}10 THEN A(B,C)=44 
790 NEXT CsNEXT 8 

B00 A(5, 5)=X:Al6, 6) =% 

B10 ALA, S)=73A(5, 4) 22 

820 P=0 

830 GOSUB 370 

R40 GOTO 30 
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LIFE 


There are some ‘classic’ computer’ programs, 
ones which found widespread acceptance’ the 
moment they were announced. In the classics 
category I-would place HUNT THE WUMPUS, ELIZA 
and LIFE. 


LIFE was invented by John Conway, of Cambridge 
University, Late in 1970. The program simulates 
the birth, death and growth of cells in a 
closed colony. Rather than breeding 
indiscriminately Like fruit flies until all 
available space and food is consumed, _ the 
entities within the colonies of LIFE proceed in 
a most orderly fashion. 


The entities Live on a grid (measuring 15 by 
15, in this case} in accordance with the 
following rules devised by Mr Conway: 


- every cell has eight neighbours, and the 
state of these eight determines the fate of 
that cell in the next generation 


- if a cell has two, or three, neighbours 
(no more, no tess) it will survive into’ the 
next generation 


- if there are three surrounding cells, 
and the place on the grid being checked is 
empty, anew cell will be born in that cell in 
the next generation 


- if there are four or more’ neighbours, 


the cell will not survive to the next 
generation 
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With the aid of these simple rules, some very 
startling colony patterns evolve. Some die off 
very quickly, others settle down into a single 
shape, or into two or three shapes that cycle 
in subsequent generations. 


Here are ae few generations from one run of 
CONWAY'S COLONY, as we've called our version of 
LIFE: 


baeen Ahead Shae d SWREE Bepen Conte BEE Nt BEGTE HOSED Bene Chene Ertee SHttE Sette BYERS SEeEe HUSEE SrEee SuiEE GELES Fate TOBE BODES Hees Sante beeew teERe FREE SHEEN SHED eters 


GENERATION 1] 


K K X X KX X XK K K 

K OK x * K OX X 
KX K XK KX XK K K Xx 

kK X K OK xk OK x 

X x xX K KX KX XK XK 

K xX K KX XX K OK OK 
K K OX K XK 

x KX K OK OX x OK K K K 

K K K KK K X K X 
K X K K XK x OK OR X 

x KX KX K K XK K KX xX x 

a Kk OX * K x 
K OK K XK K x 


TPRe Retee OTEE BSOPY Beteg SOTd BEEdS EEOe Sones HeEEt Eenee Cites Shree Pitan erat SOGEE BIEES Ferme Noted OREM CStde Hird Shie ORE Some Phere SOEhe boned EEOOT Sones areee 
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ey 
in 


GENERATION 


x KX X K XX 


2 ON DORON FORE REREE NUE eR OROeE DOES DENY Reiter CON DEERE eiewh beded SORE OBrtd Niven Ghtbe wehbe wien Stee Feeuy SEEPS SE REY PERSE HERES Felt GOEL hHhe ehh ed 


asees 
Meet 


GENERATION 


Mt SE 


se 


Me - 


KK kK KH 


x 
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GENERATION 4 


x OK XK 
x OX 
X bs K Xx 
K K 
K OX K X 
x Xx K XK 
K x x 
x i x 
K * K x 
GENERATION & 
x 
K x x X 
K x 
K 
x x 
x xX x x 
K 
K OX OK 
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GENERATION 6 


ik 
x K xX 
K OX 
K XX x 
KOK ¥ 
K 


SOO eE RAED AMEE FOOTE COE8T BtUED ERdee Senet BHHEE HEER ORESH FERED DPOOs SOOER OOTP SARE FEE) BERTH FHEEE terth Bowes Piers ehheH BEBE FET eT 15 one 


You'LlL see in the Last generation there are 
three Lines each of three cells. These are 
called ‘traffic Lights’ because they go from: 


x x 


* to * * * to * to * * * and so on... 
x xx 


You can see the first traffic Light (as * * *) 
at the bottom of generation five. The groups of 
four are stable units, which stay as they are 
from generation to generation, unless’ other 
cells touch the group from the outside. There 
are a number of shapes such as these _ which 
often occur in LIFE programs. You're Likely to 
become familiar with them as you continue to 
run the program. 


As you can see (Lines 80 to 140) the original 
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colony is generated at random. Once you've 
become familiar with this version of the 
program, you might Like to try and rewrite it 
so that you can enter your own colony. You'll 
find when you do this that a balanced pattern, 
such as a couple of diamonds, is more Likely to 
evolve in an interesting way than are the 
purely random colonies. 


10 REM CONWAY'S COLONY 
20 CLS 


30 COLOR 2,1 
50 DIM A(15,15) 

60 DIM B{15,15) 

70 G=1 

R0 FOR X=2 TO 14 

90 FOR Y=2 10 14 

110 IF RND(O)}.4 THEN AtX, ¥)=1 

120 BX, Y)=A(K,¥) 

130 NEXT ¥ 

140 NEXT X 

150 GOSUB 330 

160 G=6+! 

170 FOR X=2 TO 14 

180 FOR Y=2 TO 14 

190 C=0 

200 IF A(X-1,¥-1)=1 THEN C=C+l 

210 IF ACX-1,¥)=1 THEN C=C+! 

220 IF ACK-1,Y+1)=1 THEN CCH 

230 IF A(X,Y-1)=1 THEN C=C+t 

240 IF A(X,¥+i)=1 THEN C=C 

250 IF AUX+i,¥-1)=1 THEN C=C+! 

260 IF ACK#1,¥)=1 THEN C=C#1 

270 IF A(X+L,Y+l)=1 THEN C=Cel 

280 IF A(X,V)=1 AND CQ}3 AND C&>2 THEN BUX, Y)=0 
290 IF A(X,¥)=0 AND C=3 THEN BUX, Y)=I 
300 NEXT Y 
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310 NEXT X 
320 GOTO 150 

330 PRINT 2 9, "GENERATION "36 

340 SOUND (6/241) ,2 

350 PRINT:PRINT =": 

390 FOR X=2 TO 14 

406 FOR Y=2 TO 14 

410 AU, ¥)=BUX, V1 

420 IF A(L,Y)=1 THEN PRINT °& ": ELSE PRINT" "3 
440 NEXT Y 

450 PRINT:PRINT " — * 

440 NEXT X 

470 RETURN 
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NIMGRAB 


This is a game which seems easy at first, but 
is the very devil to play and win. The program 
was prepared for this book by Glen Pringle. 


You and the wily computer take it in turns’ to 
take objects away from the ones on the screen. 
There is a Limit to how many you can take away 
each move. This Limit does not change within a 
game, although it changes from round to round. 
The winner is the person who forces the other 
player to remove the Last object. 


Once you see it in action, you'll understand 
how to play it. Then you can start working on 
perfecting a method of actually beating the 
computer, 


19 REM NIMGRAB 

20 CLS 

30 M=O:E=0s Z=RND(B) +16 

40 IF 2aINT(Z/2)=2 THEN 7=Z+1 

30 H=3+RND (2) 

60 PRINT “THE MAXINUM YOU CAN GRAB IS*H 
70 GOSUB 276 

80 IF E>0 THEN PRINT "YOU TOOK*E", AND I TOOK"® 
90 FOR K=1 10 2 

100 PRINT Ks: IF RND(10)>8 THEN PRINT 
110 NEXT K 

120 BOSUB 270 

130 PRINT "AND HOW MANY WILL YOU GRAB?* 
135 P#=INKEY$ 

140 E=VAL(INKEY$) 

150 IF E¢i OR EH OR E>Z THEN 140 

160 PRINT:PRINT"SO YOU WANT TO BRAB"E 
170 Z=I-E 
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180 G0SUB 270 

190 IF 7¢i THEN GOTO 320 

200 Q=2-1- INTC (2-1) /(H41) 8 CWt1) INT CRND (2) ) +INTCRND (2) ) 
210 IF Qi OR GH THEN 200 

220 GOSUB 270 

230 1=1-Q 

240 IF Z¢i THEN PRINT*T GRABBED THE LAST ONE SO YOU WIN!!":END 
250 GOSUB 276 

260 GOTO 60 

270 PRINT 

2B0 PRINT "SHHRSTRLSS Rea Sta eeaaa’ 

290 PRINT 

300 FOR O=1 TO S00:NEXT 0 

310 RETURN 

320 PRINT "YOU GRABBED THE LAST ONE " 

330 PRINT ,°SO 1 WIN''’sFOR Z=1 TO SOO:NEXT 2 

340 SOUND 16,3:50UND {6,2:SQUND 13,4:SOUND 18,2:SOUND 16,5 
350 SOUND 13, 6:END 
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LAS VEGAS HIGH 


Here's a slot machine program for you to run. 
You need only decide how much you'Lt bet before 
'puLling the handle’ on the machine, and _ the 
reels will whirl away. 


Your winnings, as you'd expect, are related to 
the relative chances of _ the various 
combinations coming up. The computer keeps up 
the chatter as the game, and your wealth (or 
poverty) unfold. 


The program, prepared for this book by Glen 
Pringle, leads you through the responses 
required from you. 


10 REM LAS VEGAS HIGH 

20 GOSUB 1110 sREM INITIALISE 

30 GOSUB 870 :REM PLAYER INPUT 

40 GOSUB 520 :REM OPERATE SLOT MACHINE 
00 IF CASHC1 THEN 90 

60 IF CASH2500 THEN 290 

70 6070 30 

GO REM tkas3 

90 REM BROKE 

100 REM saaea 

110 60SUB 410 

120 PRINT “THAT’S THE END OF THE LINE,” 
130 PRINT "OH ONCE MIGHTY GAMBLER..." 
140 GOSUB 410 

150 PRINT "YOU'RE STONE, FLAT BROKE!!" 
160 GOSUB 410 

170 PRINT "PRESS ’Y’ IF YOU'D LIKE TO" 
180 PRINT "HAVE ANOTHER 62 AT BREAKING” 
190 PRINT "!!''! LAS VEGAS HIGH !!ti!? 
200 PRINT "(OR PRESS *N’ IF YOU WISH TO°SPRINT , “LEAVE)” 
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210 AS=INKEY$ 

220 IF AS<>"Y" AND AS<>"N" THEN 210 

230 IF A$="¥" THEN RUN 

240 PRINT:PRINT "OK, PUNTER..." 

290 605UB 410 

260 PRINT "THANKS FOR THE GAME!” 

270 END 

200 REM OSS eeeg ganas 

290 REM BROKE THE BANK 

O00 REM REUEUETR EE 

310 G05UB 410 

S20 PRINT “WELL DONE, GAMBLER! !" 

330 GOSUB 410 

340 PRINT "YOU'VE REACHED OUR HOUSE LIMIT" 
350 PRINT "SO WE’LL HAVE TO THROW YOU OUT 
360 PRINT "PEOPLE WITH LUCK LIKE YOURS GIVE" 
380 PRINT "OUR CASINO A BAD NAME.....0. : 
390 GOTO 160 : 
400 REM tangy 

410 REN DELAY 

420 REM @eane 

430 FOR P=1 TO 1000:NEXT P 

440 PRINT: PRINT 

450 RETURN 

460 REM Qeeeeaany 

47) REN DELAY TWO 

480 REM teayggaes 

490 FOR P=i TO 1000:NEXT P 

JOG RETURN 

GLO REM SERRSeTa ease yaaa 

s20 REM OPERATE SLOT MACHINE 

BOO REN SRREEE RATE 

340 CLS 

v0 BOSUB 410 


540 PRINT WJ PAABA AAAS AAA ARANAA ALAA DAAAAY F 


370 PRINT " 4° 
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080 FOR H=1 TO 3 

290 GOSUB 460 

600 A=RND (46) 

B10 TF AC2 THEN PRINT A$(4)3:C(N)=1 

620 IF A>d AND ACS THEN PRINT AS(S)530(H)=2 

630 TF Aro AND ACi2 THEN PRINT AS(1);:C(M}=3 

640 IF Adi AND Ac20 THEN PRINT A$(2);:C(M)=4 

690 IF Ad19 AND AC31 THEN PRINT AS(S)3sC{M)=5 

660 IF Ad30 THEN PRINT A$(6)3:C(M)=6 

670 PRINT “&";:SOUND 31,1 

680 NEXT M 

69) GOSUB 410 

700 WIN=0 

7YO TF C¢(£)40{2)4C(3)=3 THEN 1220 

720 TF C(1)=C(2) AND €(3)=C(2) AND C(2)=2 THEN 1240 

730 TF CC1)=C(2) AND C(3)=0(2) AND COL)COE AND C(2)<93 THEN 1250 
740 TF C(d)=0(2) OR C(h)=C(3) OR C(2)=C(3) THEN 1240 

750 IF 0(3)=2 THENPRINT"A BELL AT THE END 15 A BONUS!" :WIN=WIN+. 6 
760 IF C(1)=3 AND C(3)=3 THEN PRINT"AN APPLE AT EACH END 1S 6000" 
765 TF C¢(1)=3 AND C(3)=3 THEN WIN=WIN+. 5 

770 IF C(1)=4 AND C(2)=3 AND C(i)=4 THEN GOSUB 1270: WIN=WINt. 4 
780 BOSUE 410 

790 WINSINT(WINSBET) 

BOO IF WIND0 THEN PRINT “AND YOU'VE WON°WIN"!":CASH=CASH+WIN 

810 TF WIN=0 THEN PRINT "AND YOU*VE LOST $"BET: CASH=CASH-BET 

820 GOSUB 416 

B30 IF CASH>O0 THEN PRINT "SG NOW YOU HAVE $"CASH 

840 GOTO 446 

850 REN 

G60 REN PERaaeegsayy 

870 REN PLAYER INPUT 

B80 REM SURE eeaasayt 

870 CLS 

900 GOSUB 410 

910 IF CASH(300 THEN PRINT "HI THERE, GAMBLER!" 

920 IF CASH)299ANDCASH( 400 THEN PRINT “YOU'RE DOING WELL TONIGHT" 
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930 IF CASH>S99 AND CASHC900 THEN PRINT®LADY LUCK HAS CERTAINLY"; 
935 IF CASH)S99 AND CASHC900 THEN PRINT” SMILED ON YOU!" 

940 IF CASH>B99 AND CASH(1200 THEN PRINT "THE FATES ARE BEING": 
945 IF CASH)899 AND CASH(1200 THEN PRINT " EXTREMELY KIND" 

950 IFCASH)1199 THENPRINT“IT 15 SO GOOD TO SEE AN EXPERT AT WORK” 
960 GOSUB 470 

970 PRINT:PRINT "YOU HAVE $"CASH 

980 PRINT: INPUT "HOW MUCH DO YOU WANT TO BET”;BET 

990 IF BETSCASH THEN PRINT "YOU AIN’T GOT THAT MUCH!*:GO0TO 980 
1000 GOSUB 410 

1010 PRINT "OK, SIR, $"BET"IT IS!* 

1020 GOSUB 410 

1030 PRINT "PRESS THE SPACE BAR TO PLAY” 

1040 IF INKEY$<>" * THEN 1040 

1050 FOR T=1 TO 40 

1060 PRINT TAH(T/2);"4eaeeed STAND BY saanaee 

1070 PRINT 

1080 NEXT T 

1090 RETURN 

{110 REM INITIALISE 

1130 CLS 

1140 DIM A$(6) ,C¢4) 

1150 CASH=250 

1140 FOR B=1 TO 4 

1170 READ A$(B) 

1190 NEXT B 

1190 RETURN 

1200 DATA “SAPPLES", "#CHERRY#", "#BELLE”, "!'BAR!!* 

1210 DATA °<<LEMOND}", *CCPLUNI]" 

1220 PRINT*THREE BARS! ''":GQSUB410:PRINT"THAT’S JACKPOT STYLE! !" 
1230 WIN=WIN+9:G0T0 750 

1240 PRINT "THREE BELLS!!! ":WIN=WIN#3.9:6070 750 

1250 PRINT "THREE OF A KIND": WIN=WIN+3,5:G0TO 750 

1260 PRINT ">> A PAIR <<"sWINEWINt. 7:60T0 750 

1270 PRINT "THAT OLD *CHERRY, BELL, CHERRY’ * 

1280 PRINT "COMBINATION IS ONE OF NY FAVORITES! ":RETURN 
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SWITCHEROO 


In Switcheroo, you're presented with the digits 
1 to 9 arranged in a random order. You have to 
get them into the 123456789 order in as few 
moves as possible. 


You enter your moves as numbers, and the 
computer performs a 'switcheroo' using the 
number you've entered. The program was prepared 
for this book by Glen Pringle. 


10 REM SWITCHEROO 
20 CLS: B=B+! 
30 PRINT:PRINT"PLEASE STAND BY..." 
40 GOSUB 100 
50 GOSUB 220 
b0 IF A$="123456709" THEN 390 
70 MEH 
80 GOTO 50 
90 END 
100 MeL: X=0 
110 Ag="* 
{20 FOR T=i 10 9 
130 L=RND(9) +48 
140 Q=4 
150 IF MIDS(A$,@,1)=CHRS(L) THEN 130 
160 IF Q<T THEN Q=0+1:60T0 150 
170 AS=AS+CHRS(L) 
180 PRINT AS 
190 PRINT:SOUND 1,1 
200 NEXT T 
210 RETURN 
220 REM PRINT QUT 
230 IF MY THEN 260 ELSE CLS 
240 PRINT: PRINT: PRINT 
250 PRINT "MOVE NUNBER*N 
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260 PRINT@107,M 
270 PRINTA256,A$:SOUND 31,1! 

280 PRINT:PRINT*WHICH NUNBER TO SWITCHEROO?" 
290 IF INKEY$ <>°" THEN 290 

300 CS=INKEY$ 

310 R=VALIC$) 

320 IF RCL OR R98 THEN 300 

330 BS="" 

340 FOR T=9 TOR STEP -1 

350 BS=BS+NID$ (A$, T, 1] 

360 NEXT T 

370 AS=LEFTS(A$,R-1) 488 

380 RETURN 

390 PRINT: PRINT: PRINT 

400 PRINT A$ 

410 PRINT: PRINT: PRINT 

420 PRINT*YOU DID IT, CHAMP!" 

430 PRINT:PRINT"AND IT TOOK JUST"M*"MOVES..." 
435 IF B=! THEN H=M 

440 IF MCH THEN HEN 

450 PRINT "LOW SCORE-"H 

440 FOR I=1 TO 3000:NEXT 

470 GOTO 20 
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MANCALA 


MANCALA is one of the series of 'pebble-in-pits' 
games often called names Like OWARI, AWARI and 
KALAH. The game is played from Africa to the 
Philippines, and now moves into your home, via 
a very clever computer opponent. 


As you can see from the sample game which 
follows this introduction, the game begins with 
six 'pits' (the Letters A to F and L to 6G) 
facing each player. Your pits are those from L 
to G. Each pit contains three seeds at the 
beginning of the game. Choosing any pit on your 
Side, you pick up all the seeds from it, and 
then proceed to move in a clockwise direction, 
sowing a seed in each pit as you pass it. You 
do not sow any seeds in the pits at each end of 
the board, the ones which start off as zeroes. 


If your final seed Lands opposite an empty pit, 
then all the seeds in the pit you've Landed in 
become yours, and are transferred to your 
'home'. Your home is the zero to the Left of 
the board, the computer's home is the zero to 
the right. 


The game continues until either side is 
completely empty, so the player cannot move. At 
this point, the player with the largest number 
of seeds in his or her home is the winner. 


The computer plays well in this game, but with 


practice you'LL learn to defeat it. Just don't 
expect too many victories in the early stages. 
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Here's one game against the program 
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This is Later in the game: 
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THAT" S THE END OF THE GAME 


oa Ly 


MY SCORE? 19 22 “YOUR SCORE 
YOU" RE THE WINNER! 


And here's the Listing of MANCALA: 


10 REM MANDALA 

15 REM SHOWING STRUCTURED 

14 REM PROGRAMMING TECHNIQUES 
20 GOSUB 930:REM INITIALISE 

30 GOSUB 770:REM PRINT BOARD 
40 FOR P=} TO SO0:NEXT PsREM DELAY 
50 GO5UB 140:REM COMPUTER MOVE 
60 GOSUR 770:REM PRINT BOARD 
70 GOSUB 620:REM HUMAN HOVE 

80 CH=0:HW=0 

90 FOR C=1 TO 12 

100 IF C47 THEN CW=CWHAIC) 

110 IF C36 THEN HW=HW+A(C) 

120 NEAT C 

130 IF CW=0 OR HW=0 THEN 510 
140 GOTO 30 

120 REM SESReSSaae ganas 

160 REM COMPUTER HOVE 

17) GH=0:0=0 
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190 C=C + 1 
190 IF A(C)=0 THEN 180 

200 Z=C + AIC) 

210 IF 2312 THEN Z=Z - 12 

215 FLAG=0 

220 IF 736 THEN IF A(1-6)<)0 AND A(Z)=0 THEN FLAG=! 
225 IF FLAG=1 THEN IF A(Z-6))6M THEN GM=C 

227 FLAG=0 

230 IF 2<7 THEN IF A(Z+6)<)0 AND A(Z)=0 THEN FLAG=1 
235 IF FLAG=1 THEN IF A(Z+4) 6M THEN GM=C 

240 IF Cé& THEN 180 

250 IF GN=0 THEN 370 

260 C=GH 

270 PRINT 2 34,"1°LL MOVE FROM "sCHR$(644C),° * 

272 SOUND RND(O)420+1,3:SOUND RND(O)#20+1,1:SOUND 5,2 
275 PRINT @ 34," Pe 

280 FOR Z=C TO CHA(C) 

290 IF 2312 THEN A(Z-12)=A(7~12) 41 

300 IF 2613 THEN A(Z)=A(Z) 41 

310 NEXT 2 

320 Z=C#A(C)-t:1F 212 THEN 2=2~-12 

330 AIC) =0 

340 B(2)=B(2) +A (13-2) :A 13-2) <0 

350 RETURN 

360 RENGASHRETNSEENS 

370 REM NON-SCORE MOVE 

380 W=0 

390 WeW + 1 

400 C=INT{RND (0) £6) 41 

410 IF ACC) ¢> 0 THEN 440 

420 IF W620 THEN 390 

430 GOTO 510 

440 PRINT 2 34,"I°LL HOVE FROM ":CHR$(444C) 

442 SOUND 6, 1: SOUND 3, 1 SOUND eND (00420613 sSOUND RND(O) #2041, 1 
445 PRINT 9 34," ne 

450 FOR I= C TO C+A(C) 

440 IF 2¢13 THEN A(Z)=A(Z) +1 
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470 IF 1312 THEN A(2-6)=A (7-6) 41 
480 NEXT 7 

490 A(C)=0:G0T0 35 

500 REN Seeaeeenggnags 

510 REM END OF GAME 

520 GOSUB 770 

530 PRINT 9 34,"THAT'S THE END OF THE GAME" 

540 SOUND RND(0)$20,1:SOUND RND(0)#20,2 

550 IF B(L)2B{2) THEN PRINT @ 480, "YOU'RE THE WINNER!" 
540 IF B(L)<B(2) THEN PRINT @ 480,°I°M THE WINNER!" 

570 IF B(1)=B(2) THEN PRINT @ 480,"IT LOOKS LIKE A DRAW!" 
580 PRINT 2 416,"HY SCORE)":B(2)s" "sB(1);"<YOUR SCORE® 
600 GOTO 400 

b10 REMESEERESENENENaE 

620 REN HUNAN MOVE 

630 PRINT @ 34, "WHICH PIT TO START WITH?":PRINT @ 44," " 
635 INPUT A$:PRINT @ 34," ee 
b40 PRINT 294,"  ":BEASC(A$)-64 

650 IF BC? OR B12 THEN 430 

660 CO=B:Z7=B+A(B):IF 2)12 THEN 2=Z-12 

570 M=A(Z) 

680 FOR 7=B TO B+AIB) 

690 IE 1342 THEN A(2-12)=A(Z-12) +1 

700 IF 2613 THEN A(Z)=A(Z}41 

710 NEXT 7 

720 1=R+A(B)-1:1F 2242 THEN 2=2-12 

730 IF M=0 THEN B(1)=Bi1)#A(13-2) :A(13-2)=0 

740 AICO) =0 

750 RETURN 

7h RENSEROSERONESENES 

770 REM PRINT BOARD 

780 PRINT 2128," A BC D E F*:PRINT* 's 

900 FOR C=1 10 4 

810 PRINT AIC): 

920 NEXT C 

830 PRINT:PRINT Bil): " "H(2):PRINT " “3 
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940 FOR C=12 TO 7 STEP -1 

850 PRINT AIC): 

860 NEXT C 

870 PRINT:PRINT " L$ K dg I H &6" 
B80 COPY:REM DELETE THIS LINE IF YOU DON’T WANT PRINTER COPY 
B90 RETURN 

900 PRINT 2 34,°I MOVE FRON "sCHRS(64+6N) 
910 C=6N 

920 RENRURGRSESTEEURER 

930 REM INITIALISE 

940 CLS 

960 DIM ACi2),B{i2) 

970 FOR C=1 TO 12 

980 AIC)=3 

990 NEXT C 

1000 RETURN 


If you look back to the first few Lines of this 
program, you'll see that it uses structured 
programming techniques as outlined on pages one 
to four, in the TIC TAC TOE program. 


113 


114 


APPENDICES 


ONE - WHAT IS A COMPUTER? 
TWO - GLOSSARY OF TERMS 
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APPENDIX ONE - WHAT IS A COMPUTER 


You don't need to know what a computer is, or 
how it works, to make use of it and_ get 
pleasure out of using it. In much the same way, 
you don't need to able to repair a car in order 
to drive it. However, having some knowledge of 
the parts of the machine you're using — whether 
it's a car, a video recorder or a computer — is 
Likely to add to your pleasure in using it. 


CONTROL 


ALU 


MEMORY 


This diagram shows the five basic parts of a 
computer. We'LL start by Looking at the Left- 
hand box, the INPUT. This refers to any means 






OUTPUT 
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which exist for getting information into’ the 
computer from the outside world. It can be a 
keyboard, a microphone (if the computer is 
equipped to understand speech), or the computer 
Can read the contents of a magnetic disk, 
magnetic tape (like the cassettes your computer 
uses) or from punched tape. 


The next box across is the heart of the system, 
the Arithmetic Logic Unit, or ALU for’ short. 
This carries out the mathematical work 
required, and makes decisions. 


Above it you can see the CONTROL UNIT which 
controls the flow of information through the 
computer. Below the ALU in our diagram is the 
memory which holds not only the program and the 
results of computations while the program is 
running, but also the ‘intelligence’ of the 
machine. Here are the intructions the computer 
needs in order to be able to do such things as 
control the TV screen and interpret the word 
SOUND in a program in order to make a noise. 
We'LL be looking at memory in a Little more 
detail shortly. | 


On the right-hand side of the diagram is’ the 
OUTPUT. This, as you've probably realised, 
refers to any means by which the result of the 
computer's deliberations is fed to the world 
outside the machine. The output can be via a 
number of things such as a TV screen, a printer 
or a speech unit. 


In many computers today, the CONTROL UNIT and 
the ALU come together on a single chip, called 


118 


a CENTRAL PROCESSING UNIT, or CPU. This means 
that only input, output and a power supply have 
to be added to turn the CPU into a computer. 


So, in its most primitive form, the computer is 
a device which operates upon numbers under the 
control of other numbers. The computer has a 
central processing unit which actually carries 
out the numerical operations, a memory where a 
mixture of instructions and data is stored, and 
some way of getting information in from the 
outside world, and of sending results out. 


Computers contain two sorts of memory. The 
first kind is fixed when you buy the computer. 
This sort of memory is called ‘Read Only 
Memory’ because all the computer can do is read 
it and act in accordance with the instructions 
written in this memory area. It is called ROM 
for short. 


As well as ROM, your computer (in common with 
all other computers) has memory which can _ be 
modified when the computer is running. This 
memory — called ‘Random Access Memory' (or RAM) 
- is the place where the program you type in, 
or Load in from a tape, resides. RAM contents 
are Lost (the computer, in effect, 'forgets') 
when the power is turned off. 


So, ROM is fixed memory, which tells’ the 
computer how to do what it needs to do when 
running (such as how to read your depressions 
on the keyboard, and how to add numbers 
together}, and RAM is changeable memory which 
holds the program you are currently running and 
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the intermediate results of that program. 


When you program your computer, you do so_ in 
the computer Language known as BASIC. The 
advantage of BASIC to human beings is that it 
1S reasonably like English, so is fairly easy 
to work with. However, the computer does not 
understand BASIC. It only understands, and 
thinks in, numbers. So, within the ROM is the 
means by which the computer changes a_ BASIC 
program line, such as A = RND(O)*20, into a 
sequence of numbers it can understand. 


As well as the kind of 'built in' memory we've 
been talking about, there is external memory, 
which is often called mass storage, with the 
peripherals used to store this memory being 
known as MASS STORAGE DEVICES [or MSD). The 
cheapest MSD, the one you probably use with 
your computer, is the domestic cassette 
recorder. Although tape is cheap, it is slow 
and 'sequential', that is, you have to search 
through a tape item by item in order to find 
the one you want. 


The other most common sort of MSDs are those in 
the disk family. FLOPPY DISKS are flexible 
disks, about the size of a 45 rpm _ record, 
coated with magnetic material. They” are 
permanently sealed in square envelopes within 
which they are free to rotate. The disks are 
used in conjuction with 'floppy disk drives’ 
which contain magnetic heads which can detect 
and create magnetic patterns on the disks. 


HARD DISKS, which are larger and more expensive 
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than floppy ones, can hold much more 
information than floppies. A typical floppy can 
hold betwean TOOK and 800K. Hard disks can hold 
hundreds of thousands of kilobytes’ of 
information. 
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APPENDIX TWO - GLOSSARY OF TERMS 


Accumulator — part of the computer's Logic unit 
which stores the intermediate results of 
computations 


Address ~-— a number which refers to a Location, 
generally in the computer's memory, where 
information is stored 


Algorithm — the sequence of steps used to solve 
a problem 


Alphanumeric -— generally used to describe a 
keyboard, and signifying that the keyboard has 
alphabetical and numerical keys. A _ numeric 
keypad, by contrast, only has keys for _ the 
digits one to nine, with some additional keys 
for arithmetic operations, much like a 
calculator | 


APL - this stands for Automatic Programming 
Language, a Language developed by Iverson in 
the early 1960s, which supports a Large set of 
operators and data structures. It uses a non- 
standard set of characters 


Application software — these are programs which 
are tailored for a specific task, such as word 
processing, or to handle mailing Lists 


ASCII - stands for American Standard Code for 
Information Exchange. This is an almost 
universal code for tetters, numbers and 
symbols, which has a number between O and 255 
assigned to each of these, such as 65 for the 
Letter A 
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Assembler - this is a program which converts 
another program written in an assembly Language 
(which iS a computer program in which a single 
instruction, such as ADD, converts into a 
single instruction for the computer) into the 
Language the computer uses directly 


BASIC - stands for Beginner's All-purpose 
symbolic Instruction Code, the most common 
Language used on microcomputers. It is easy to 
learn, with many of its statements being very 
close to English 


Baud - a measure of the speed of transfer of 
data. It generally stands for the number of 
bits (discrete units of information) per second 


Benchmark - a test which is used to measure 
some aspect ofthe performance of a computer, 
which can be compared to the result of running 
a similar test on a different computer 


Binary - a system of counting in which there 
are only two symbols, O and 1 fas opposed to 
the ordinary decimal system, in which there are 
ten symbols, 0, 1, 2, 3, 4, 5, 6, 7, 8 and 9). 
Your computer 'thinks' in binary 


Bit - an abbreviation of 'binary digit', the 
smallest discrete unit the computer can 
understand, and having a value of O or 1 


Boolean Algebra - the algebra of decision- 
making and logic, developed by English 
mathematician George Boole, and at the heart of 
your computer's ability to make decisions 
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Bootstrap - a program, run into the computer 
when it is first turned on, which puts’ the 
computer into the state where it can accept and 
understand other programs 


Buffer —- a storage mechanism which holds’ input 
from a device such as keyboard, then releases 
it at a rate which the computer dictates 


Bug — an error in @ program 


Bus - a group of electrical connections used to 
Link a computer with an ancillary device, or 
another computer 


Byte - the smallest group of bits (see bit) 
which makes up a computer word. Generally a 
computer is descibed as being 'eight bit' or 
'16 bit', meaning the word consists of a 
combination of eight or sixteen zeroes or ones 


Central Processing Unit (CPU) -— the heart of 
the computer, where arithmetic, Logic and 
control functions are carried out 


Character code - the number in ASCII (see 
ASCII) which refers to a particular symbol, 
such as 32 for a space and 65 for the _ Letter 
TAt 


COBOL - stands for Common Business Orientated 
Language, a standard programming Language, 
close to English, which is used primarily for 
business 


Compiler — a program which translates a program 
written ina high Level (human-Like) Language 
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into a machine Language which the computer’ is 
abLe to understand directly 


Concatenate - to add (adding two strings 
together is known as 'concatenation') 


CP/M - these initials stand for Control 
Program/Microcomputer, an almost universal disk 
operating system developed and marketing by 
Digital Research, Pacific Grove, California 


Data — a general term for information processed 
by a computer 


Database — a collection of data, organised to 
permit rapid access by computer 


Debug — to remove bugs (errors) from a program 


Disk - a magnetic storage medium (further 
described as a 'hard disk', ‘floppy disk' or 
even 'floppy') used to ° store computer 
information and programs. The disks’ resemble, 
to a Limited extent, 45 rpm sound records, and 
are generally eight, five and a quarter, or 
three anda half inches in diameter. Smaller 


'microdisks'! are also available for some 
systems 
Documentation - the written instructions and 


explanations which accompany a program 


DOS - stands for Disk Operating System (and 
generally pronounced 'doss'), the versatile 
program which allows a computer to control a 
disk system 
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Dot-matrix printer — a printer which forms’ the 
Letters and symbols by a collection of dots, 
usually on an eight by eight, or seven by five, 
grid 


Double-density - adjective used to describe 
disks when recorded using a special technique 
which, as the name suggests, doubles the amount 
of storage the disk can provide 


Dynamic memory — computer memary which requires 
constant recharging to retain its contents 


EPROM - stands for Erasable Programmable Read 
Only Memory, a device which contains computer 
information in a semi-permanent form, demanding 
sustained exposure to ultra-violet Light to 
erase its contents 


Error messages — information from the computer 
to the user, sometimes consisting only of 
numbers or a few letters, but generally of a 
phrase (such as ‘Out of memory') which points 
out a programming or operational error’ which 
has caused the computer to halt program 
execution 


Field — A collection of characters which form a 
distinct group, such as an indentifying code, a 
name or a date; a field is generally part of a 
record 


File - A group of related records which are 
processed together, such as an inventory file 
or a student file 


Firmware — The solid components of a computer 
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system are often called the ‘'hardware', the 
programs, in machine-readable form on disk or 
cassette, are called the '‘software', and 
programs which are hardwired into ai circuit, 
are Called 'firmware'. Firmware can be altered, 
to a limited extent, by software in some 
circumstances 


Flag - this is an indicator within a program, 
with the 'state of the flag' (i.e. the value it 
holds) giving information regarding a 


particular condition 
Floppy disk — see disk 


Flowchart — this is a written Layout of program 
structure and flow, using various shapes, such 
as a rectangle with sloping sides for a 
Computer action, and a diamond for a computer 
decision. A flowchart is generally written 
before any lines of program are entered into 
the computer 


FORTRAN -—-a high level computer’ Language, 
generally used for scientific work (from 
FORmula TRANs Lation) 


Gate - a computer 'component' which makes 
decisions, allowing the circuit to flow in one 
direction or another, depending on the 
conditions to be satisfied 


GIGO - acronym for ‘Garbage In Garbage Out', 
suggesting that if rubbish or wrong data is fed 
into a computer, the result of its processing 
of such data (the output) must also be rubbish 
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Global - a set of conditions which effects’ the 
entire program is called 'global', as opposed 
to 'Local' 


Graphics -— a term for any output of computer 
which is not alphanumeric, or symbolic 


Hard copy —- information dumped to paper by a 
printer 


Hardware — the solid parts of the computer (See 
'software' and 'firmware') 


Hexadecimal - a counting system often used by 
machine code programmers because it is closely 
related to the number storage methods used by 
computers, based on the number 16 as opposed to 
our ‘ordinary’ number system which is based on 
10) 


Hex pad -a keyboard, somewhat like a 
calculator, which is used for direct entry of 
hexadecimal numbers 


High-Level tlangauges — programming’ Languages 
which are close to English. Low-Level Languages 
are closer to those which the computer 
understands. Because high-level Languages have 
to be compiled into a form which the computer 
can understand before they are processed, high- 
level languages run more slowly than do their 
Low-Level counterparts 


Input - any information which is fed into a 
program during execution 
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I/O — stands for Input/Output port, a device 
the computer uses to communicate with the 
outside world 


Instruction — an element of programming code, 
which tells the computer to carry out a 
specific task. An instruction in assembler 
language, for example, is ADD which (as you've 
probably guessed} tells the computer to carry 
out an addition 


Interpreter — converts the high-level ('human- 
understandable') program into a form which the 
computer can understand 


Joystick - an. analogue device which feeds 
signal into a computer which is related to the 
position which the joystick iS occupying; 
generally used in games programs 


Kilobyte - the unit of language measurement; 
one kilobyte (generally abbreviated as_ K) 
equals 1024 bytes 


Line printer - a printer which prints’ a 
complete line of characters at one time 


Low-level Language — a Language which is close 
to that used within the computer {see high- 
Level Language) 


Machine Language — the step below a_ Low-Level 
Language; the Language which the computer 
understands directly 

Memory - the device or devices used by a 


computer to hold information and programs being 
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currently processed, and for the instruction 
set fixed within a computer which tells it how 
to carry out the demands of the program. There 
are basically two types of memory (see RAM and 
ROM) 


Microprocessor -— the 'chip' which Lies at’ the 
heart of your computer. This does’ the 
'thinking' 


Modem — stands for MOdulator/DEModulator, and 
is a device which allows one computer. to 
communicate with another via the telephone 


Monitor — (a) a dedicated television-screen for 
use aS a computer display unit, contains no 
tuning apparatus; [(b) the information within a 
computer which enables it to understand and 
execute program instructions 


Motherboard — a unit, generally external, which 
has slots to allow additional 'boards' 
(circuits}] to be plugged into the computer to 
provide facilities (such as high-resolution 
graphics, or ‘robot control') which are not 
provided with the standard machine 


Mouse ~— a control unit, slightly smaller than a 
box of cigarettes, which is rolled over’ the 
desk, moving an on-screen cursor in parallel to 
select options and make decisions within a 
program. 'Mouses' work either by sensing the 
action of their wheels, or by reading a_ grid 
pattern on the surface upon which they are 
moved 


Network - a group of computers working in 
tandem 
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Numeric pad — a device primarily for entering 
numeric information into a computer, similar to 
a calculator 


Octal - a numbering system based on _ eight 
{using the digits 0, 1, 2, 3, 4, 5, 6 and 7) 


On-Line - device which is under the direct 
control of the computer 


Operating system - this is the ‘big boss' 
program or series of programs’ within the 
computer which controls the computer's 
operation, doing such things as calling up 
routines when they are needed and assigning 
prioritories 


Output - any data produced by the computer 
while it is processing, whether this data is 
displayed on the screen or dumped to the 
printer, or is used internally 


Pascal - a high level language, developed in 
the Late 1960s by Niklaus Wirth, which 
encourages disciplined, structured programming 


Port - an output or input ‘hole’ in_ the 
computer, through which data is transferred 


Program — the series of instructions which the 
computer follows to carry out a predetermined 
task 


PILOT - a high tevel language, generally used 
to develop computer programs for education 


RAM - stands for Random Access Memory, and is 
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the _memory on board the computer which holds 
the current program. The contents of RAM can 
be changed, while the contents of ROM (Read 
Only Memory) cannot be changed under software 
control 


Real-time -—- when a computer event is 
progressing in line with time in the ‘'real 
world', the event is said to be occurring in 
real time. An example would be a program which 
showed the development of a colony of bacteria 
which developed at the same rate that such a 
real colony would develop. Many games, which 
require reactions in real time, have been 
developed. Most ‘arcade action' programs occur 
in real time 


Refresh — The contents of dynamic memories (see 
memory) must receive periodic bursts of power 
in order for them to maintain their contents. 
The signal which 'reminds' the memory of its 
contents is called the refresh signal 


Register — a location in computer memory which 
holds data 


Reset - a signal which returns the computer to 
the point it was in when first turned on 


ROM — see RAM 

RS~232 - a standard serial interface (defined 
by the Electronic Industries Association) 
which connects a modem and associated terminal 


equipment to a computer 


S-100 bus — this is also a standard interface 
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(see RS-232) made up of 100 parallel common 
communication Lines which are used to connect 
circuit boards within micro-computers 


SNOBOL - a high Level Language, developed by 
Bell Laboratories, which uses- pattern 
recognition and string manipulation 


Software - the program which the computer 
follows (see firmware) 


Stack - the end point of a series of events 
which are accessed ona last in, first out 
basis 


Subroutine — a block of code, or program, which 
is called up a number of times within another 
program 


Syntax - as in human Languages, the syntax is 
the structure rules which govern the use of a 
computer Language 


Systems software — sections of code which carry 
out administrative tasks, or assist with the 
writing of other programs, but which are not 
actually used to carry out the computer's final 
task 


Thermal printer - a device which prints’ the 
output from the computer on heat-—sensitive 
paper 


Time-sharing - this term is used to refer to a 


Large - mumber of users, on independent 
terminals, making use of a single computer, 
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which divides its time between the users’ in 
such a way that each of them appears to have 
the 'full attention' of the computer 


Turnkey system — a computer system (generally 
for business use) which is ready to run_ when 
delivered, needing only the 'turn of a key' to 
get it working 


Volatile memory — a memory device which’ Loses 
its contents when the power supply is cut off 


Word processor - a dedicated computer lor a 
Computer operating a word processing program) 
which gives access to an ‘intelligent 
typewriter’ with a Large range of correction 
and adjustment features 
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Now that you've mastered simple BASIC 
programming on your Dick Smith VZ200, what do 
you do next? 


The answer Lies in this book. Tim Hartnell, the 
co-ordinator of the VZ200 Users' Club, and 
co-author of the book GETTING STARTED WITH YOUR 
VZ200, turns his attention to a number of 
fascinating areas of computer programming, 
inc Luding: 


THE SECRET OF ANIMATION AND MOVING 
GRAPHICS 


HOW TO USE MODE 1 
MAKING MUSIC 

PEEK AND POKE 
As well as the 'lessons', there are fifteen or 
SO great games programs you're sure to enjoy 
running, including ROMTHELLO, V-WING SPACE 
BATTLE, CHECKERS, LAS VEGAS HIGH and _ the 

prehistoric game, MESOZOIC ATTACK. 


This book is the key to moving beyond simple 
BASIC programming with your Dick Smith Vz200. 





